BASIGDEBUG 記 00L 
LOG0C 半 理 
教室 で 活躍 ずる MZ 
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存 ダ ンス テム 厩 月 
多 交 み ソフ 人 意識 。 導 葵 


ea 


人 @ 写 真 は MZ -2200 に 、 プ リン タ (MZ-1P07 )、 フ ロッ ピー(MZ-1F07 ) お よび カラ ー デ ィ ス プレ イ (MZ-1D15) を 組み 合わ せ た 例 で す 。 


* 5 2 SS oc を ペー GS 


8 色 カ ラー 対応 グラ フィ ッ ク 標 準 実装 、 応 用 自在 の クリ ー ン メモ リ シ ス テム 、 
16 ビ ッ ト へ の 対応 、MZ の 先進 機能 を 受け 継い だ 充実 し た ハー ド に 、 ホ ビー 
か ら 高 度 な ば ジネス まで IMZ-2000 で 蓄積 され た 膨大 な 数 の アプ リケーション 
ソフ ト が その まま 使え 4、 う れ し い ソフ トコ ンチ ビリ ティ 。 さ きら に いま 話題 の 
新 言語 MZ-LOGO も 走る と いう 充実 し た ソフ ト 環 境 に ご 注目 くだ る い 。 ま た 
本 体 だ け で な 〈 周 辺 機 器 を も 含め た シス テム コス トッ パフォー マン ス を 徹底 し て 
追求 、 目的 に 合わ せ て 手軽 に 、 自在 に MZ- 2200 シ ステ ム が 構築 で きま も 


MZ-2200 の ま 


@ テ ドレ ス 空 間 64K バ イト オー ル RAM。 

応用 自在 の クリ ー ン メモ リ シ ス テム 欠 高 機 
能 ・ 高 速 CPU Z80A 搭 載 倫 8 色 カラ ー 
コン トロ ー ル を は じ め と し た ハイ レベ ル な グラ 
フィ ッ ク 機 能 但 MZ- 2000 の 豊富 な アプ リ 
ケー ショ ン が その まま 使え る 完全 互換 性 信 
16 ビ ッ ト へ の 対応 も 考慮 し た 先進 設計 馬 
充実 し た ソフ トウ ェ ア サ ポー ト 欠 4 スロ ッ ト の 
拡張 ユニ ッ ト 標準 装備 食 操 作 性 を 重視 し 
た 前 面 コン トロ ー ル (IPL ス イッ チ 、 リセ ッ ト 
スイ ッ チ 、 音 量 ボリ ッ ム ) 今 機能 性 に 徹し た 
使い や すい キー ボー ド 。 


モモ な 


供 治 字 ROM MZ-1R13 発売 予定 
⑱ デ ー タ レコ ー ダ MZ-1T02 標準 価格 19.800 円 
⑱ ドニ フ ロッ ピー デス ク ド ライ 1 プ ※ MZ-1FO7 標準 価格 158.000 幅 
人 @80 桁 シリ アル プリ ンタ MZ-1PO7 標準 価格 79800 幅 
@7 ラ ー イ ンク ジェ ッ ト プ リン タ  MZ-1PO4 標準 価格 228.000 円 
信 12 型 グリ ー ン デイ スプ レイ MZ-1D12 標準 価格 32,000 円 
で 14 型 カラ ー デ テイ スプレイ  MZ-1D15 標準 価格 72000 円 
@ マ ー ク カー ドリ ー ダ  。MZ-80MCR 標 準 価格 198.000 円 
@16 ビ ピッ ト ボ ー ド キッ ト  MZ-1MO1 標準 価格 78.000 幅 
人 漢字 ROM ポ ー ド (MZ-]M01 用 )MZ-1RO8 標準 価格 29.000 幅 
⑱ ユ ニ バ ー サ ル ]/0 カ ー ド MZ-8BIO] 標準 価格 16.700 円 
@RS-232C7 ル 人 2 クー フェ イス MZ-8BIO3 標準 価 格 50.000 円 
倫 GP-IB イ ンタ ー フ ェ イ ス MZ-8BIO4 標準 価格 45.000 幅 
楽 イ ンタ ー フ ェ イ ス お よび 接 締 ケ ー ブ ル 付 属 共 プリ ンタ マー ク カ ー ド 
リー ダ を ドラ イブ させ る に は 、 そ れ ぞ れ イ ンタ ー フ ェ イ ス お よび 接 統 
ケー ブル ( 各 別 売 ) な ど が 必要 で また テー プペ ベー ス で MZ-2200 を 
ご 使用 の 場合 は 、 導 用 デー タレ コー ダ MZ-1T02 が 必要 で 

| シス テム ソフ + ト ウェア | 
信 倍 精度 テー プ BASIC※  MZ-1Z003 標 準 価格 7.000 円 
イン タプ リタ PASCAL※  MZ-12004 標 準 価格 12.000 円 
⑱@ シ ステ ム プ ログ ラム ※ MZ-12005 標 準 価格 25.000 円 
欠 マ シン ラン ゲー ジ ※ MZ-12006 標 準 価格 7.000 円 
念 RS-232C/GP-IB コ ント n- ル BASICW MZ-12010 標 準 価格 9.500 円 
免 デ イス ク BASIC MZ-2Z001 標 準 価格 10.000 幅 
欠 カ ラー ティ スク BASIC  MZ-22002 標 準 価格 12.000 円 
念 倍 精 度 デ ィ ス ク BASIC MZ-2Z003 禁 準 価格 12.000 円 


12 型 グ リー ン 地 スプ レイ MZ- -1D12 標準 価格 32、000 円 


(MZ-2200 江 用 ) 


カラ ー ン クジ ェ ッ ト プ リン タ MZ-1P04 標準 価格 228」 000 円 


@ フ ロッ ピーDOS MZ-22004 析 人格 50000 円 。 16 ビッ ト ポ ー ド キッ ト MZ-1M01 標準 価格 78.000 円 
楽 印 は テー プペ ベー ス で す 。 (オォ オプション: 漢字 ROM ポ ー ド MZ-1R08 標準 価格 29.000 円 ) 
の ャ 
パー ソナ ルコ ンピュータ 標準 価格 128.000 円 


いよ いよ 10 月 2 日 か ら MZ-2200 を 使っ た 新 講座 が スタ ー ト し ます 。 


例 テ レビ 大 阪 9:30 一 10:00 代 テ レビ 東京 9:30 一 10:00 代 テ レビ 愛知 9:30 一 10:00 倫 テレ 静岡 24:35 一 25:05 欠 び わ 湖 放送 11:25 一 1:55 参 
奈良 テレ ビ 12 :00 一 12:30 倫 テレ ビ 和 歌 山 9:30 一 10:00 倫 西日本 放送 7:30 一 8:00 久 熊本 県 民 テ レビ 8:30 一 9:00(10 月 9 日 スタ ー ト ) ※ テ キス ト 
・ 案 学ぶ コン BASIC」980 由 (新紀元 社 ) 発売 中 ん 可 会 : 大 和田 換 / 斎 藤 と も 子 ・ 講 師 :Dr パソ コン 宮永 好 道 和 以下 の 放送 局 で は MZ・700 

シリ ー ズ を 使っ た 講座 放映 中 供 北 海道 放送 24:00 一 24:30 倫 東北 放送 24:00 一 24:30 代 新潟 放送 7:15 一 7:45 輸 山梨 放送 7:30 一 8:00 代 長野 
放送 9:30 て 10:00 但 石川 テレ ビ 24:35 一 25:05 念 京都 放送 17:30 一 18: 00@ 山 隊 放 送 24:05 一 24:35 但 広島 テレ ビ 7:00 一 7:30 代 テレ ビ 本 日本 
24:36 一 25:06 食 琉 球 放送 24:00 一 24:30 


32 ャ ー 災 梗 式 会 社 本 社 〒545 大 阪 市 阿倍 野 区 長池 町 22 番 22 号 枯 (06)621-1221( 大 代表 ) 
@ お 問い 合わ せ 、 資 料 請求 は … シ ャ ー プ 国 内 産 機 営業 本 部 〒162 東京 都 新宿 区 市 谷 八幡 町 8 番地 鶴 (03)260-151( 大 代表 ) 
2 また は シャ ー プ ビジ ネス 帳 、 お よび 本 社内 国内 家電 営業 本 部 シス テム 機器 営業 企画 部 また は シャ ー プ エン ジニ アリ ング 昌 へ 。 4 
輸 詳し く は 後 の 情 報 ペー ジ を ご 参照 くだ さい 。 の も 


「 SHIA に RP 
女心 り 6 こい っ し よ に 。 全 何 を み バ ー す る 


プ ャ ズ エ 


ンジ ニア リン ググ 本 式 会 社 シッ ヘ パソ コン テレ ビ X 1 へ の お 問い 合わ せ は 下記 へ どう ぞ 。 ) 


(03) 735 一 4649 


シャ ー プ エン ジニ アリ ング 帆 
札 幌 
〒063 札幌 市 西区 24 軒 1 条 7 
本 目 3-17 
富 (011)642-4649 
札 幌 SS (011)641 一 4649 
北 見 SS (0157)36 一 4649 
遠 軽 SB (01584)2 一 1137 
帯 広 SB (0155)25 一 6832 
苫小牧 SB (0144)32 一 4649 
室 蘭 SB (0143)45 一 4649 
岩見 沢 SS (01262)4 一 4649 
滝 川 SB (0125)22 一 0200 
路 SS (0154)25 一 4649 
室 SB (01532)4 一 4800 
川 SS (0166)25 一 4649 
内 SB (01622)2 一 4764 
南 SS (0138)51 一 4649 


東北 地区 

シャ ー プ エン ジニ アリ ング 幌 

仙 台 
〒983 仙台 市 六 丁 目 字 本 新 田 東 
2 番 の 1 囚 (0222)88-9141 
宮 城 SS (0222)88 一 9141 
仙 南 SB (02245)3 一 4649 
北 宮城 SS (02292)2 一 5520 
石 巻 SB (0225)96 一 5627 


侯 知 十 英 償 


9 関越 地区 W 
横須賀 SB 


シャ ー プ エン ジニ アリ ング 幌 

宇都 宮 

〒320 宇都 宮 市 不動 前 4 丁目 
2 番 41 号 

容 (0286)35-1155 


栃 木 SS (0286)37 一 1178 
新発田 SB (02542)4 一 2646 
小山 SB (0285)22 一 4649 
(0272)52 一 4649 
(0276)45 一 3241 
(0292)41 一 4649 
(0298)22 一 6111 
(0252)85 一 4649 
(02873)6 一 7131 
(02563)8 一 6761 
(0255)23 一 7148 
(0258)23 一 1830 
(0263)25 一 7536 
(0265)24 一 0640 
(02662)3 一 8421 
(0262)28 一 4649 
(0268)27 一 1329 


東京 地区 
シャ ー プ エン ジニ アリ ング 幌 
東 京 
〒114 東京 都 北 区 東田 端 2 』 目 


Fr 車型 算 夢 還 帳 
田 
の 
ロ 


崎 SS 
(0468)36 一 9883 
(045)902 一 7701 
(0463)54 一 4649 
(0465)23 一 0271 
相模 原 SB (0427)59 一 4208 
山 梨 SS (0552)26 一 4649 
静岡 SS (0542)85 一 4649 
沼 津 SS (0559)22 一 4649 


多 摩 SB 
湘 南 SS 
小田 原 SB 


北陸 地 

シャ ー プ エン >: mm 

金 沢 

〒921 石川 県 石川 郡 野々 市 
町 御 経 迷 1096 の 1 


谷 (0762)49-4649 


川 SS (0762)49 一 4649 
尾 SB (07675)3 一 4649 
松 SB (0761)22 一 4649 
山 SS (0764)51 一 4649 
岡 SS (0766)25 一 4649 
井 SS (0776)54 一 4649 
賀 SB (07702)3 一 4649 


テ d 症 


導 凍 民有 


59 帆 
名 古屋 
〒454 名 古屋 市 中 川 区 山王 


青 


弘 
む 
八 


岩 
釜 
水 
宮 
秋 
大 
羽 
本 
山 
酒 
新 
福 


いわ き SS 
原 


気仙 沼 SB 


五所 川原 SB 


十和田 SB 


(0226)23 一 1588 
(0177)38 一 0281 
(0173)35 一 8891 
(0172)36 一 6425 
(01752)2 一 7380 
(0178)44 一 4649 
(01762)2 一 4649 
(0196)38 一 6087 
(0193)23 一 4649 
(01972)3 一 8428 
(01936)3 一 5658 
(0188)63 一 4649 
(0186)49 一 2975 
(01823)3 一 4649 
(01842)3 一 4649 
(0236)31 一 4649 
(0234)24 一 4649 
(02332)3 一 1277 
(0249)45 一 4649 
(0242)25 一 4649 
(0245)53 一 4649 
(0246)28 一 4649 
(02442)2 一 5025 


森 SS 


前 SB 
っ SB 
戸 SS 


手 SS 


町 SB 


北海 道 地 区 


STV 文 化 教室 
容 (011)642-7156 
@ BASIC 入 門 A・B コ ー ス 


朝日 カル チャー セ ンタ ー 
会 (011)222-4121 

@ ゅ BASIC 入門 コー ス 

道 新 文化 セン ター 
容 (011)221-2111 

@ マイ コン 初級 コー ス 

道 新 文 化 セ ンタ ー< 苫 小牧 > 
会 (0144)33-5350 

@ マイ コン 初級 コー ス 

道 新 文化 セン ター< 小 梅 > 
容 (0134)23-1700 

@ マイ コン 初級 コー ス 

4 プラ ・ コ ンピュータ 教室 
容 (011)261-0221 


13 番 17 号 


信 (03)893-4649 


東 SS (03) 626 一 4649 
(03) 629 一 4649 
(03) 776 一 4649 
(03) 382 一 4649 
(03) 972 一 4649 
(0425)84 一 4649 
(0422)32 一 4649 
(0486)66 一 4649 
(0484)45 一 6996 
(0485)53 一 3111 
(0487)61 一 3511 
(0492)46 一 1655 
(0484)81 一 2311 
(0489)36 一 6502 
(0472)65 一 4649 
(04702)2 一 3227 
(0473)68 一 4649 
(0474)24 一 8003 
(0479)23 一 3373 
(045)753 一 4649 


@ レデ ィ ス コー ス @ OL コー ス 
@ ママ さん コー ス 
@ ビジ ネス マン コー ス 
@ お 子 様 コ ー ス e 熟年 コー ス 
旭川 マイ コン 教室 
会 (0166)33-3300 

BASIC 入門 ・ 初 級 ・ 中 級 ・ 

上 級 ・- ビ ジネス コー ス 


東北 地区 


FTV 学 苑 < 福島 TV> 

会 (0245)21-3232 
@ ゅ BASIC 初級 ・ 演 習 コ ー ス 
FCT 学 園 


谷 (0249)23-5564 
@ BASIC 入門 コー ス 


FBC 福 島 交 化 学園 マイ コン 教室 


会 (0245)22-9118 
*BASIC 初 級 ・ 中 級 コー ス 


3 


丁目 5 番 5 号 
谷 (052)322-4649 


名 古屋 SS (052)332 一 2621 


北 名 古屋 SS 
半 田 SS 


( 


@ お 気軽 に どう ぞ 、MZ マ イコ ユン セミ ナー 


(0587)66 一 4649 
(0569)22 一 4649 
(0564)24 一 4649 
(0532)53 一 4649 
(0534)63 一 4649 
(0592)32 一 6200 
(0596)36 一 1100 
(0593)51 一 4649 
(0595)21 一 2228 
(0582)73 一 4649 
(0584)89 一 5771 
(05742)6 一 4649 
(0577)33 一 6761 


崎 SS 


1 
SB……… サー ビス プラ ンチ 


東北 電子 計算 機 専 門 学校 
会 (0222)22-8931 
@ BASIC 入門 コー ス 


仙台 放送 教養 学園 
傘 (0222)63-0191 
@ ゅ BASIC 入門 - 中 級 コ ー ス 


関 剖 地区 


栃木 マイ コン 学院 
谷 (0286)37-3997 
@ マイ コン 入門 ・ 初 級 コー ス * 
リリ ー コ ミニ ティ ー カ レッ ジ 
会 (0292)21-9476 
@ マイ コン 基礎 ・ 応 用 コー ス 
足利 コン ピュ ー タ 学院 
容 (0284)72-2981 


@ ゅ BASIC 入門 コー ス 
@ ビジ ネス マン コー ス 


近畿 地区 


シャ ー プ エン ジニ アリ ング 幌 
大 阪 


〒556 大 阪 市 浪速 区 恵美 須 
西 1 丁目 2 番 9 号 


全 (06)643-4649 


大 阪 SS (06) 643 一 4649 
東大 阪 SB (0729)94 一 4649 
(06) 629 一 1741 
(0726)34 一 4649 
(0722)45 一 4649 
和 (0724)32 一 7677 
神 戸 SS (078)453 一 4649 
明 石 SB (078)927 一 7404 
淡 路 SB (07992)4 一 2917 
阪 神 SS (06) 421 一 4649 
姫 路 SS (0792)66 一 1818 
豊 岡 SB (07962)3 一 7389 
滋賀 SS (0775)45 一 4649 
彦 根 SB (0749)22 一 3299 
京 (075)672 一 2375 
舞 (0773)75 一 0653 
奈 (07435)3 一 6691 
(07456)5 一 1491 
(0734)45 一 4649 
(0739)25 一 3011 
(0735)22 一 0900 


シャ ー プ エン ジニ アリ ング 側 

広 島 
〒731-01 広島 市 安佐 南 区 大 
園 町 大 宇 西原 2249 の 1 


会 (082)874-4649 


広 島 SS (082)874 一 2281 
東 広島 SB (0824)28 一 4649 
福 山 SS (0849)51 一 4649 
岡 山 SS (0862)41 一 4649 
津 山 SB (08682)2 一 6296 
倉敷 SB (0864)22 一 2183 
山 ロ SS (0834)31 一 4155-6 
萩 SB (08382)2 一 5877 
下 関 SB (0832)53 一 1065 
山口 中 央 SB (08397)2 一 7318 
陰 SS (0852)24 一 4649 
田 SB (08552)2 一 1521 
雲 SB (0853)22 一 4649 
取 SB (0857)22 一 8278 
子 SB (0859)29 一 7311 


米 如 圧 激 王 


静岡 けん みん テレ ビ 
合 (0542)51-3300 
@ ゅ BASIC 入門 コー ス 
朝日 カル チャ ー セ ンタ ー< 新 宿 > 
容 (03)344-1941 
@ ゅ BASIC 入門 コー ス 
タイ ヤ モ ン ド ビ ジ ネス 
会 (03)504-6476 
@ ビジ ネス マン コー 
e@ 経営 者 ・ 管 理 者 コー ス 
山梨 文化 学園 
会 (0552)53-1111 
@ BASIC 入門 コー ス 
シャ ー プ マイ コン 教室 
容 (03)260-1161 
@ ゅ BASIC 入門 コー ス 
コン ピュ ー タ プラ ザ ・ ニ デコ 
会 (03)251-8061 
ゅ BASIC 入門 講座 


四国 地区 


シャ ー プ エン ジニ アリ ング 相 
高 松 


〒760 高松 市 森 太 町 1861 の 3 
谷 (0878)33-4649. 


川 SS (0878)33 一 4649 
島 SS (0886)25 一 4649 
知 SS (0888)82 一 4649 
村 SB (08803)5 一 2138 
媛 SS (0899)71 一 4649 
予 SS (0897)41 一 8840 
予 SS (0895)25 一 4649 


九州 地区 


シャ ー プ エン ジニ アリ ング 由 
福 賠 


羽 河 暮 表 弄 中 


〒816 福岡 市 博多 区 井 相 田 
2 丁目 12 番 地 の 1 


谷 (092)572-4649 


福岡 SS (092)572 一 4649 
佐 賀 SB (0952)24 一 9462 
久留 米 SS (0942)21 一 1251 
北九州 SS (093)592 一 5961-2 
筑 豊 SS (09482)3 一 7519 
大 分 SS (0975)36 一 3909 
長 崎 SS (0958)44 一 4649 
佐世保 SB (0956)32 一 6666 
熊 本 SS (0963)66 一 4649 
大 牟田 SB (0944)55 一 5111 
八代 SB (09653)2 一 2188 
天 草 SB (09692)3 一 8711 
鹿児島 SS (0992)53 一 4649 
川 内 SB (0996)25 一 3777 
宮 崎 SS (0985)24 一 6723 
延 岡 SB (0982)34 一 5735 
都 城 SB (0986)24 一 2235 


沖縄 地区 
沖縄 シャ ー プ 電機 
〒900 沖 纏 県 那 芋 市 路 2 丁 目 
10-1 
谷 (0988)62-2231 


沖 縄 SS (0988)62 一 2231 
宮 古 SB (09807)2 一 3436 
石垣 SB (09808)2 一 4072 
沖縄 中 部 SS (09893)7 一 9912 
沖縄 北部 SB (09805)2 一 1506 
竜 美 SB (09975)3 一 4777 


パパ ンコ ンク リ ニッ ク 
容 (03)234-4141 


@ ビジ ネス 入門 コー ス 


ゃ 管理 者 コー ス 
の 業務 放 ・ 業 種別 コー ス 


Z 
北 陸地 区 


北国 文化 セン ター 
容 (0762)22-0101 
@ BASIC 入門 コー ス - 


能 森 学院 富山 マイ コン スク ー ル 
容 (0764)32-2513 
ゅ BASIC 入門 ・ 中 級 コ ー ス 
金沢 マイ コン スク ー ル 
容 (0762)47-5107 
初級 ・ 中 級 コー ス 
富山 テレ ビバ ソコ ンス クー ル 
容 (0764)25-1111 


@ 日 入門 - 初 級 ・ 中 級 コー ス 
@ 応用 ・ マ ン ツ ー マ ン コー ス 


奄 痕 の 診 裁 ネ ッ ツ アー ク 


ジ シャー バビ ジネス 株 式 芸 社 


北海 道 地区 
シャ ー プ ビジ ネス 人 幅 札幌 
〒063 札幌 市 西区 24 軒 1 条 7 

丁目 3 番 17 号 

容 (011)641-3631 
(0138)55 一 0232 
(0166)25 一 2585 
(0154)22 一 9777 
(0155)35 一 4365 
(0157)36 一 6848 


東北 地区 


シャ ー プ ビジ ネス 析 仙 台 
〒983 仙台 市 六 丁 目 字 本 新 
田 東 1 

谷 (0222)88-9151 


半 庄 皿 証 図 
中 中 査 三 営 


郡 山 (0249)45 一 4380 
い わき (0246)28 一 181 
青森 (0177)38 一 7501 
入 戸 (0178)44 一 7713 
盛岡 (0196)38 一 8868 
秋 。 田 (0188)62 一 0027 
山形 (0236)33 一 3215 
庄 内 (0234)24 一 5344 


関越 地区 
シャ ー プ ビジ ネス 相 新 潟 
〒950 新潟 市 上 所 中 1 丁目 7 
番 21 号 
傘 (0252)83-1795 


ンタ ュー 


長 岡 (0258)23 一 1151 
長 野 (0262)28 一 4618 
E 3 田 (0268)25 一 2788 


松 本 (0263)25 一 0547 


シャ ー プ ビジ ネス 幌 宇 都 宮 
〒320 宇都 宮 市 不動 前 4 本 
目 2 番 14 号 

合 (0286)37-3576 
戸 (0292)41 一 0552 
浦 (0298)24 一 2231 
橋 (0272)23 一 3511 
田 (0276)46 一 8255 


東京 地区 


シャ ー プ ビジ ネス 人 幌 東京 
〒130 東京 都 墨 田 区 石原 2 
] 目 12 番 3 号 


水 
に コ 
前 
太 


偽 (03)625-5111 人 Q 


(03) 625 一 5111 
(03) 620 一 9591 
(03) 384 一 7806 
(03) 737 一 1561 
(03) 958 一 3374 
(0425)84 一 1220 
(03) 436 一 0811 
(0472)63 一 4043 
(0473)68 一 0279 
(0486)63 一 5159 
(0484)45 一 6671 
(0485)54 一 9011 
(045)751 一 3215 


藻 滞 凍 幕 牙 二 河 旧 沙 沙 沙 薄 貼 
激 記 和 田 可 漂 河 槍 さき 穫 団 汐 湯 


ソフ トウ ェ ア 情 報 小 紙 
「MZ ソ フト ウェ アイ ン フ ォ メ ーション 」 を 


随時 発行 し て し いま も 


マイ コン ショ ッ プ に 配布 し て いま す , 
最寄り の お 店 で ご 利用 くだ さい 。 


中 部 地区 


朝日 文化 セン ター 
容 (052)581-3631 
@BASIC 入 門 ・ 上 級 コ ー ス 


毎日 文化 セン ター 
容 (052)581-1366 
@ マイ コン 入門 ・ 中 級 コ ー ス 


名 古屋 電気 通信 工学 院 
会 (052)682-3189 
@ バン コン 初級 ・ 中 級 コ ー ス 
名 古屋 情報 経理 専門 学校 
容 (052)263-9500 
入門 ・ 初 級 ・ 中 級 ・ 上 級 コ ー ス 
中 部 シャ ー プ マイ コン 教室 
容 (052)332-2626 


@ マイ コン 入門 コー ス 


日 経 パ ソコ ン 教 室 
合 (052)332-1831 
@ る ビジ ネス コー ス 
岐阜 中 日 文化 セン ター 
傘 (0582)65-2531 
@ マイ コン 初級 ・ 中 級 コ ー ス 


近畿 地区 
KBS 京 都 放送 アカ デミ ー 


合 (075)441-4161 
@BASIC 入門 A-B コ ー ス 


近鉄 文化 数 室 < 阿 倍 野 > 
会 (06)649-0071 
@ ゅ BASIC 入門 A・B コ ー ス 
@ ビジ ネス コー ス 
朝日 カル チャ ー セ ンタ ー〈 神 戸 > 
会 (078)321-5222 
ゅ BASIC 入門 コー ス 


MZ シ リー ズ 、 バ パソ コン テレ ビ X 1、 ボ ケ ・ > 
(ンー の お 問い る わせ は 下記 へ どう 


塚 2 2024 
府 (0552)26 一 1035 
岡 (0542)82 一 8825 
津 (0559)22 一 5673 


北陸 地区 
シャ ー プ ビジ ネス 幌 金 沢 
〒921 石川 県 石川 郡 野々 市 
町 御経塚 1096 番 1 号 
合 (0762)49-1240 


山 (0764)51 一 1317 
井 (0776)27 一 1800 


中 部 地区 
シャ ー プ ビジ ネス 幌 名 古屋 
〒454 名 古屋 市 中 川 区 山王 
3 丁目 5 番 5 号 
会 (052)332-2631 


(0582)73 一 2325 
(0534)63 一 1551 
(0532)53 一 0648 
(0592)32 一 4123 
(0593)51 一 6703 


N 与 陳 判 


| 


富 
福 


朝日 カル チャ ー セ ンタ ー< 大 阪 > 
会 (06)222-5222 
@BASIC 入門 コ ー ス 
アク セス イン 
谷 (06)644-6611 
@ BASIC 入門 コー ス 


中 国 新 聞 文化 セン ター く 広 島 > 
会 (0822)47-4788 
@ BASIC 入 門 A- 昌 コー ス 


中 国 新聞 文化 セン ター< 福 山 > 


会 (0849)32-1362 
@ 初級 マイ コン 講座 


山陰 中 央 新報 文化 セン ター 
容 (0852)26-3262 
@ 実務 マイ コン 入門 コー ス 


近畿 地区 
シャ ー プ ビジ ネス 幌 大 阪 
〒556 大 阪 市 浪速 区 恵美 須 
町 西 1 ] 目 2 番 9 号 

会 (06)643-3021 


船場 (06) 271 一 0319 松 。 山 (0899)71 一 1146 
北大 阪 (0726)34 一 4682 新居浜 (0897)43 一 8840 
東大 阪 (0729)94 一 1619 徳島 (0886)25 一 2103 
南大 阪 (0722)41 一 9266 高知 (0888)83 一 7008 
奈 良 (07435)3 一 1423 
和歌 山 (0734)44 一 6130 九州 地区 
京 都 (075)661 一 7335 シャ ー プ ビジ ネス 和弥 福岡 
滋賀 (0775)43 一 2131 和 〒ge 福岡 市 博多 区 井 相 田 
環 鶴 (0773)76 一 6037 2 丁目 12 番 地 の 1 
神 戸 (078)452 一 8531 谷 (092)572-2611 
姫 。 (0792066 一 8411 と ん 放 (093)59z6521 
佐 賀 (0952)25 一 2640 
中 国 地区 長 ・ 崎 (0958)46 一 9513 
シャ ー プ ビジ ネス 帳 広 島 佐世保 (0956)32 一 6281 
〒731-01 広島 市 安佐 南 区 欧 熊 "本 (0963)62 一 9036 
園 町 大 字 西 原 2249 番 地 の 1 大 分 (0975)36 一 0289 
会 (082)874-4925 宮 崎 (0985)25 一 2251 
束 広島 (0824)28 一 3 が 革 還 00962731 っ 2088 
福山 (0849)81-352g 貞 旧 島 (0992052 一 1653 
本 00008 和 0 
松 江 (0852)26 一 5211 沖縄 地区 
鳥取 (0857)22 一 0621 シャ ー プ ビジ ネス 相 沖 縄 
徳 山 (0834)31 一 5521 〒900 沖縄 県 那覇 市 忠 2 丁 
小郡 (08397)2 一 3881 目 10 番 地 の 1 
下 。 関 (0832)52 一 5508 容 (0988)61-7360 


BSS フ ァ ミ リー スク ー ル (山陰 放送 
会 (0859)33-0661 
@ マイ コン 教室 
岩国 家政 専門 学校 
容 (0827)21-1566 
@BASIC 入 門 コ ー ス 


四国 地区 


四国 新聞 社 
会 (0878)33-1111 
eBASIC 入 門 ・ 中 級 コ ー ス 


南海 放送 < 松山 > 
会 (0899)33-5151 
@BASIC 入 門 コ ー ス 


九州 地区 


KBC 朝 日 文化 セン ター< 福 岡 > 
傘 (092)713-1144 


四国 地区 


シャ ー プ ビジ ネス 幌 高松 
〒760 高松 市 木 太 町 1861 番 
地 の 3 

容 (0878)33-4255 


気軽 に 楽し し 【 コ ンピュータ 
が 学べ る 、 良 くわ か る と 絶 
替 さ れ だ TV 提供 番組 
* パ ツン コン サン デー” 


ビデ オカ セッ ト 発 売 中 ん 
上 巻 * 下 巻 : 各 15.000 円 


@ お 求め は お 近く の 有名 書店 、 
マイ コン ショ ッ プ ' で どう ぞ 。 


@w BASIC 入 門 コ ー ス 


朝日 文化 セン ター< 北 九州 > 
会 (093)521-8381 ・ 
BASIC 入門 コー ス 


朝日 文化 セン ター< 福 岡 > 
容 (092)431-7751 
e BASIC 入 門 コ ー ス 


毎日 文化 セン ター< 北 九州 > 
会 (693)541-1181 

@ BASIC 入門 コー ス 

宮崎 ドレ メ マ イコ ンス クー ル 
会 (0985)25-9166 

e BASIC 入 門 ・ 中 級 コー ス 


SH へ AI 


つい に 新 数 月 存 の 
ポケッ ツ フ ン と ュー タ 鐘 


1giERIHT *ETBRT' 


ー 回 回 国 国 国 画 TFT 


1 上 se 
Welealelealsaleelsslesles 


gm 回 | [ce] ロ ] ロ NEXT LIST 9 | 軸 必 


PRINT USING GOSUB RETURN _DIM END CSAVE  CLOAD PeNP ズ " E DRG 人 


いつ で も 、 ど こ で も 、 手 軽 に 使え を る シャ ー プ "ポケ ッ ト コ ンピュータ に 、 高度 な 
科学 技術 計算 も 自在 の 新 機種 PC- 1401 が 登場 し まし た 。 よ く 《 使 う 27 の 関数 
c18 の 命令 語 が 簡単 に 入力 で きる 独自 の クイ ッ ク コ マン ド 設 計 で 、 関数 まじ 
り の 複雑 な プロ グラ ム も ラク ラク こなし ます さらに 演算 結果 の 関数 値 が ワン 
タッ チ で 得 ら れる ダイ レク ト ア ン サ ー 機 能 も 搭載 。 し か も 本 格 59 関 数 電卓 と 
し て も 使え る 便利 き 。 エ ンジ ニア や 理工 系 学生 、 そ うし た 人 々 に ゼ ぜひ 使っ て 


い だ だ きた だ い 新 鋭 機 で も 


プロ グラ ム 入 力 が 簡単 、 ス ビー ディ に 、 

クィ ッ ク コ マン ド 入 力 機 能 

INPUT や GOTO な ど 、 よ (使う 18 種 の 命令 語 
に 加 ぇ 、27 種 の 関数 が 簡単 に 入力 で きる 便利 
な クイック コマンド 入力 機能 。 アレア ファ ベッ ト を 
1 字 1 字 入力 する 類 わ し き が あり ませ ん 。 
関数 値 が 簡単 に 得 ら れる 

ダイ レク ト ア ン サ ー 機 能 

BASIC モ ー ド で の 演算 終了 後 即 、 そ の 結果 に 
対す る 関数 値 が す ば や 《 と れる ダイ レク ト ア ン 
サー 機能 を 搭載 。 簡 単 な キー 操作 で 知り た い 
関数 値 が 得 ら れる 便利 設計 で す 。 

優れ た 実務 能力 、 強 力 BASIC 搭 載 

これ まで の BASIC 言 語 に は 含ま れ て いな か っ た 
階 乗 (FAC) 、 座 標 変換 (POL、REC) 、 双 曲線 
関数 (HHSN、HCS、HTN) な ど 、 強 力 な 関数 
信 令 を 豊富 に 搭載 。 優 れん た プロ グラ メ 機 能 で 
BASIC 入 門 、 学習 か ら 実 験 、 演習 の デー タ 
処理 、 さ ら に 高度 で 複雑 な エン ジニ ア の 実務 に も 
鮮やか に 対応 し ます 。 ま た この BASIC は 、PC- 
1211/1245/1250/1251 と 共通 性 を 持つ ュ ン パチ 
ブル な BASIC。 こ れ ら の シリ ー ズ 用 に すでに 開 
発 き され て いる 豊富 な ゲロ グラ ム が 活用 で きま す 。 
低 消費 電力 C-MOS8 ビ ピット CPU 搭載 
4.2K バ イト RAM の 大 容量 メモ リー 

シス テム の 心臓 部 に は シャ ー プ "独自 の 開発 に 
よる C-MOS8 ビ ッ ト CPU を 採用 。 また この コン 
パク ト な ボディ に 、ROM40K バ イト 、RAM4.2K 


| よ (使う BASIC 命 令 が 簡単 入力 。 
| うれ し い 手 帳 サ イズ 、 独 習 テ キス ト も 
つい て 〈 る 。 マ スタ ー す れ ば 即 実務 に PC- 
応用 で きる 高 機能 設計 。 
@ オ プシ ョ ン : 標 準 カ モッ トレ コー ダ 
が 接続 で きる カモ ッ ト イ ンタ ー フ ェ イ ス 
CE-124 標準 価格 4,500 円 


バイ ト を 実装 。 多 彩 に 活用 で きる 大 容量 メモ リー 
で アプ リケーション へ の 対応 も スム ー ズ で す 。 
ゆとり の 能力 。59 関 数 2 変数 統計 機能 。 
関数 電卓 モー ド に すれ ば 、 搭 載 し た 59 の 関数 
機能 で 、 本 格 的 な 関数 電卓 と し て 使え ます 。 直 線 
回 帰 、 対 数 回 帰 い っ た 回 帰 計算 も 2 変数 統計 
計算 機能 ラク ラク こなし ます 。 
多彩 な 付加 機能 

介 高 精度 計算 能力 を フル に 活か す 実 用 的 な 16 
桁 ワイ ド 表示 銀 最 大 15 重 カッ コ 機能 食 複 雑 な 
計算 も ラク に こなす 優先 順位 判別 機能 但 プ ロ 
グラ ム が 消え な い メ モリ ー 保 護 機能 替 ア ラー ム 
や 効果 音 と し て 使え 4sBEEP 音 機能 但 ブ ログ 
ラム の リス ト 操作 を 実行 きせ な い パ スワ ー ド 機能 
@ 使 用 頻度 の 高い 数 値 入力 キー は 少し 大 きく 
する な ど 、 キ メ 細 か 〈 配 慮 し た キー レイ アウ ト 欠 幅 
170mm、 奥 行 72mm、 厚 さ 9 .5mm の コン パク ト サ イ ズ 。 


ルル:27274 
求 r ゅ 上 コリ ピュ ェ ラ 


PC-1401 


標準 価格 29,800 円 
圏 オ プシ ョ ン : 倫 デー タ の 記録 、 デ ログ ラム の チェ ッ ク が ス 
ムー ズ に で きる 424 桁 サー マル ブリ ンタ CE-126P 標 準 価格 
17,800 円 (9 モー トド 機能 内 蔵 ・ カ モッ トイ ンタ ー フ ェ イ ス つ き ) 
人 標準 カモ ッ ト レ ュー ダ が 使え る カモ ッ ト イ ンタ ー フ ェ イ ス 
CE-124 標準 価格 4.500 円 


求 r サ ゅ り ト ココ ピュ ェ ー ゴ 


標準 価格 17,800 円 


例 填 法 / 重 量 : 
幅 135x 奥 行 70X 厚 き 9.5mm/115g 


手帳 サイ ズ の コン ピュ ー タ 、 オール イン ワン シス テム に も な っ て 
A5 判 サイ ズ 。 


| か の 本 価格 9800 由 
mm UPC-125171250 


上 :」 便り 法 : 幅 135 メ 奥行 70X 厚 る 9.5mm 欠 重 量 : 115g( 電 池 含 む ) 倫 オ プシ ョ 
し 」 ン : 一 骨 に し て オー ルイ ン ワ ン シ ス テム が 組め る プリ ンタ / マ イク ロカ モッ トレ コーダ 
CE-125 標準 価格 36,800 円 4 写真 は PC-1251 寺 CE-125 


PC-|250 
標準 価格 22,800 円 


ミー グラ フィ ッ ク 表 示 、 カラ ー グ ラフ イッ ク 
印字 な ど 驚 異 の 性 能 を 誇る 本 格 派 。 


( 
PC-1501/1500 


PC-1500(RAM3.5K バ イト ) 標 準 価格 59,800 円 


写真 は PC-1501+CE-150 参 4 色 で 様々 な パタ ー ン の グラ フ や 図 条 が 描け る カラ ー グ ラフ バック プ リン タ CE-150 標準 価格 49.800 円 


3 の セー 淡 株 式 会 社 本 545 大 阪 市 同人 野 区 長池 町 22 番 22 号 佑 (06)621-1221( 大 代表 ) 
例 お 問い 合わ せ は … シ ャ ー プ 幌 国内 産 機 営業 本 部 〒162 東京 都 新宿 区 市 谷 衝 幡 町 8 番地 鶴 (03)260-1161 へ 。 


詳し く は 後 の 情報 ペー ジ を ご 参照 くだ さい 。 


PO-1501(RAM8.5K バ イト ) 標 準 価格 64,800 円 RE 層 


SHIAIS 
クラ ブッ ク 最 先 正 の 興奮 を 


TE SINULNTION IS GONELETED 


CZ-8DT 


| <CZ-800F 


価 シ ャ ー プ の エレ クト ロニ クス 技術 が 、 フ パソ 
コン と テレ ビ の 独創 的 な シス テム を 実現 。 パ 
ソコ ン の 機能 が テレ ビ の 機能 を 拡大 し 、 テ 
レビ の 能力 が パッ コン の 能力 を 一 気 に 高 
め ま し た 。 い まや パソ コン は グラ フィ イッ クア ビリ 
ティ で 選ば れる 時 代 、 映 像 表現 に 新 領 域 
を ひら いた スー パー イン ポー ズ 機 能 を は じ 
め と し た X1 の 新鮮 な グラ フィ ックス は 、 ま る に 
プロ の テク ニッ ク に 人 迫る 充実 ぶり 。 ビ ギ ナ ー 
か ら エ キス パー ト ま で 多く 〈 の 人 々 を 魅了 し て 
いま す 。 倫 も ちろ ん 、 パソ コン と し て の 高 機能 
も 見 逃 が せ な い 特 長 で す 。3CPU 構 成 、 伝 
統 の クリ ー ン 思想 を 受け 継い だ ど メ イン メモ リ 
64K バ イト 、 オ ー ル RAM。 自 動 頭 出し 機能 
を 備え た 2700 ボ ー の 高速 カセ ッ ト レ ュー ダ 
内 蔵 。 を し て こう し た ハー ドウ ェ ア に 密接 に 結 
び つ いて る の 機能 を 最大 限 に 発揮 きせ る 強 
力 な ソフ トウ ェ ア 。X1 は 、 究 極 の 8 ビッ トマ シン 
と し て 、 ホ ー ム ユー ス か ら ビ ジネス ユー ス ま で 
幅広 い 分野 へ の 応用 が 可能 な 、 まる に 21 
世紀 の メデ イア で す 。 
メイ ン CPU に Z80A(4MHz) 、 周 辺 コ ント ロー ル 用 
と し て 2 個 の サブ プ CPU 搭 載 尋 RAIM : メイ ン メ モリ 64 
K バ イト 、 テ キス ト 用 V-RAM4K バ イト 、 ユ ー ザ ー 定 
義 キ ャ ラク ター ゼネ レー タ 6K バ イト 、 グ ラフ ィ イッ ク 用 
V-RAM(48K バ イト ・ オ プ "ショ ン ) 欠 カ ラーBASIC 
イン タプ "リタ 装備 基 モ ント ロニ クス プ " リ ンタ イン ター 
フェ イス 、 ジョ イス ティ ッ ク イ ンタ ー フ ェ イ ス 内 蔵 代 8 オク 
ター プ '3 和 音 の サウ ンド ゼネ レー タ 夫 日 付 、 時 刻 、 
番組 子 約 が 可能 な カレ ンダ ー 付 タ イマ ーー 隻 小 さ な 
文字 や 細か な 縮 模 様 6<〈 っ きり と 再現 する 新開 発 ファ 
ィ ン ピ ッ チ プラ ウン 管 共 RGB 接続 端 子 と ビデ オ 入 出 
カ 端 子 付 


キャ ラク ター ゼネ レー タ バレ ッ ト 機能 


@ 喘 像 表現 の 新 領域 一 一 スー パー イン ボー ズ 機 能 


X1 は 従来 ゆず か し いと きれ て いた コン ピュ ー タ 画像 
と カラ ー テ レビ の 画像 を 、 同 じ プ ラウ ン 管 上 で 重ね 合 
わせ る こと (スー パー イン ポー ズ ) に 成功 。 新 開発 の 
ASC( オ ー ト マチ ッ ク ・ シ ンク ロナ イズ ・ コ ント ロー ル ) 回 
路 と ファ ィ イン ピッ チ プ ラウ ン 管 の 採用 に より 実現 し た も 
の で す 。 る ら に ビデ オ や ビデ オ テ ィ スク と 接続 し し 、 そ の 
画像 と コン ピュ ー タ 画像 を 重ね 合わ せる こと も 可能 。 
スー パー イン ボー ズ さ れん た 画像 は 、 デ ジ タ レ テロ ッ パ 
ー( 別 売 ) の 使用 に より 、 ビ デオ 録画 も で きま す 。 


主 な 拡張 用 オプ ショ ン 


フロ ッ ピ ー デ ィ ス ク CZ-800F 標 準 価格 198,000 幅 


フ n 光 ー 訪 タタ ー テ イス (CZ-8FA 標準 価格 24,000 幅 


ドッ ト プ リ ンタ CZ-800P 標 準 価格 142800 円 


デジ タル テロ ッッ パー CZ-8DT 標準 価格 89,800 円 


グラ フィ ッ ク RAM CZ8GR 標準 価格 32.000H 
漢字 ROM CZ-8KR 標準 価格 38,000 円 


拡張 1/0 ポ ー ト CZ-8EP 標準 価格 11,800 幅 


RF ビデ ォ コ ン バ ー タ CZ-8VC 標準 価格 15,800 円 


プラ イオ リティ 機能 


く < パソ コン テレ ビ X1 が 誇る 強力 な グラ フッ ク 機 能 > 佑 256 種 類 の キャ ラク ター が 自由 に 定義 で きる プロ グラ マブ ルキ ャ ラク 
ター ゼネ レー タ 但 多 画面 切 換え が で きる 高 機能 ゲラ フィ ッ ク 倫 凶 形 や 女池 の 色 を 瞬時 に 変え られ る パレ ッ ト 機能 免 遠近 感 、 
立体 感 の ある 画面 が つく れる プラ イオ リティ 機能 代 グ ラフ ィ ッ ク の 拡大 縮小 、 移 動 が で きる 座標 変換 機能 僅 任 意 の 面 の 
色づけ が 簡単 に で きる タイ リン グ ペ イン ト 機 能 喉 大 小 の 女 字 を 同一 画面 に 混在 で きる アト リピ ビュ ー ト 


7 コル ビス バ // 


バ パーソナル コン ピ ェ タ トキ ー ボ ー ド CZ -800C 標準 価 格 155 000 円 ・! ヵ ラー デス プレ イ テ レ ビ CZ-800D 標 価 格 113.000 円 
@ 写 真 は パー ソナ ルコ ンピュータ オキ キー ボー ド (CZ-800C) 、 14 型 カラ ー テ ディス プレ イ テ レ * (CZ- 800D) 、- 3 
フロ ッ ピ ー デ スク (CZ-800F)、 デ ジタル テロ ッッ ミー (CZ-8DT)、 ド ッ ト プ リン タ (CZ-800P) を 組合 せ た 例 で も 
な ぉ スー パー イン ボーズ は CZ-800C と CZ-800D の シス テム で 作成 可能 。 人 天 面 は オプ ショ ン の グラ フィ ッ 


RAM を 使用 し 作成 、 印 刷 合成 し た も の で も 


グセ ー 克 株 式 会 社 
本 社内 電子 機器 事業 本 部 シス テム 機器 営業 部 、 国 


パソ コン テレ ビ X 1 に は 、 ロ ー ズ レッ ド ・ メ タ サ ッ ク シ ル バ ー・ ス ノー ホリ ワイ ト の 3 色 が あり ま も 


| ペー ジ を ご 才 


本 社 〒545 人 人 

内 家電 営業 本 部 シス テム 、 : 画 部 ま 
〒114 東京 都 北 区 東田 端 2 丁目 13 番 17 号 松 (03)893-4649 お よび シャ ー プ 帆 国内 産 
八幡 町 8 番地 鶴 (03)260- 1161( 大 代表 ) へ 。 詳 し く は 後 の 情 報 : ご 参 


S ち HIAIS ビ 


@MZ -2200 シ ステ ム 構 成 図 


漢字 ROM ボ ポー ド 
MZ-1RO8 
標準 価格 29,000 円 


順 則 


V 』 


16 ビ ピッ ト ボ ポー ドキ ッ ト 
MZ-1M01 
標準 価格 78,000 円 


ーーーーーーー キ ーー 
有 M0000000M III | 
パー ソナ ルコ ンピュータ 


MZ-2200 
標準 価格 128,000 円 


80 桁 シリ アル プリ ンタ 


接続 ケー AA 
MZ-8BP5C 
標準 価格 8.600 円 


フロ ッ ピ ー イ ンタ ー フ ェ イ ス 
MZ-8BFI 
標準 価格 38,000 円 


接続 ケー ブル 
MZ-8BFC 
標準 価格 8.700 円 


接続 ケー ブル "シン グル ミニ フロ ッ ピ ー レブ さい 
MZ-8KFC ディ スク ドラ イブ 拡張 用 接続 シン グル ミニ フロ ッ ピ ー デ ィ ス ク ド ラ イブ 
標準 価格 8.700 円 MZ-80SFD MZ-80F05 MZ-80SFD 
標準 価格 3.700 円 標準 価格 158.000 円 
央 一 人 価格 158.000 円 (合計 4 ドラ イブ まで 接続 可能 ) 
マー ク カ ー ド リー ダ 用 | "0 セ ッ ト hr 9 | 
MZ-80MCB 円 NE カラ ー デ ィ スク BASIC 
標準 価格 30.000 1 MZ-2Z002 
夫人 格 198.000 円 標準 価格 12.000 円 
MZ-1D12 注 2) 字 
村 価 格 32.000 円 標準 価格 10.000 円 
放 ディ スプ レイ スタ ンド 
と 人 MZ-1S05 
14 型 カラ ター ディ スプ レイ 前 グ 標準 価格 7.000 円 
MZ-1D15 2) 
ml 標準 価格 72.000 円 記 
圏 MZ-2200 シ ステ ム ソ フ トウ ェ ア 
ちっ チル トス タン ド 唱 名 機種 名 | 標準 価格 
MZ-1S02 倍 精度 BASIC※ MZ-1Z003 | 7,000 円 
14 型 カテ ー デ ィ ス プレ イ 
き MZ-1D01 2) 雪 人 格 13.000 導 「 イ ンタ プリ タ バス カレ 表 MZ-12004 | 12.000H | 
本 昌 昌 124.000 幅 シス テム プロ グラ ム ※ MZ-1Z005 | 25,000 円 
の マシ ン ラ ン ゲ ー ジ ※ MZ-1Z006 | 7,000 円 
ーーー ン ンー MZ-1SO8 RS-232C/GP-IB コン トロ ー ル BASIC※ | MZ-1Z010 | 9,500 円 
L 3 価格 12.000 円 ディス ク BASIC MZ-2Z001 | 10,000 円 
槍 価 格 102.000 円 カラ ー ディ スク BASIC MZ-2Z002 | 12.000 | 
倍 精 度 ディ スク BASIC MZ-2Z003 | 12,.000 円 
MZ-1D09 まう フロ ッ ピーp0S ーー]Mz-2zo04 | 50.000 
標準 価格 110.000 円 ※ テ ー プ ベー ス 


トラ クタ セッ ト 


宛 実 し だ サポー 休廊 で 訪 友 い 療 佐 を 診る 


ユニ バー サル | 0 カー ド 
MZ-8BIO1 
標準 価格 16,700 円 


RS-232C シ リア ル RS-232C 用 ケー ブル 
イン ター フェ イス MZ-8BC03 
MZ-8BIO3 標準 価格 11,000 円 


標準 価格 50.000 円 


MZ-1P07 MZ-6P09 ーー デー ニキ ーー ェ rercat> 各種 
標準 価格 79,800 円 。 標準 価格 計測 器 
8.800 幅 GB-IB イ ンタ ー フ ェ イ ス GP.IB 用 ケー ブル 全 
ーー カラ ー イ ンク MZ-8BIO4 MZ-8BC04 
し CN 標準 価格 45.000 円 半生 価格 =] 
禁 \ 価 格 18.000 円 eg 
228.000 テー ブ プ BASIC 
MZ-1Z010 
136 桁 ドッ ト プ リン タ 標準 価格 9.500 円 
MZ-80P4B 
標準 価格 281.000 円 
MZ-8BP4C 0 
標準 価格 11.000 円 rr 
標準 価格 142.000 円 


ミニ フロ ッ ピ ー デ ィ ス ク ド ラ イブ 
MZ-1F07 

標準 価格 158.000 円 
(イン ター フェ イス 、 接 続 ケー ブル 含む ) 


拡張 用 接続 ケー ブル 
ミニ フロ ッ ピ ー デ ィ ス ク ド ラ イプ MZ-8BFKC 
間 MS 標準 価格 8.400 円 。 MZ-80BFK 


編 旨 | 一 ーー ジテ 
ーー 一 存 


ユニ バー サル | 0 コネ クタ 
| MZ-8BCN PTR・PTP 等 
標準 価格 2.700 円 


| os モデ ム ・ 


拡張 用 ミニ フロ ッ ピ ー デ ィ ス ク ド ラ イブ 


テレ タイ ブ プ 等 


注 1) 16 ビ ピット ボー ドキ ッ ト MZ-1M01 を 使用 する に は 専用 デー タレ コー ダ MZ-1T02( オ プシ ョ ン ) か が 必要 で ま 
注 2) MZ 専 用 ディ スプ レイ に は 、 MZ-2200 と の 接続 ケー プレ が 付属 し て いま す 


ニニ ーー の ーー 


ルン クルーン コン と ユー 久 


@MZ-3500 シ リー ズ シ ステ ム 


[HH 
漢字 メモ リ 
Z-1R05 
標準 価格 38.000 円 
92 
ニニ ニニ 
「 ーーーー」 
ーー 


ハー ソナ ルコ ン ヒ ュー タ 
MZ-3531( ミ ニ フ ロ ッ ヒ ー1! 双 内蔵) 
標準 価格 320.000 円 
MZ-3541( ミ ニ フ ロ ッ ヒ ー2 基 内 蔵 ) 
標準 価格 410.000 円 


クラ JC 4 
(32KB・ ヘ ー ジ 1) 


MZ-1R03 
標準 価格 59,.000 円 


[HHHHUHH 
[HLIHUHHI 


グラ フィ ッ ク メ モリ 
(32KB・ ヘ ペー ジ 2 ま た は 3) 


MZ-1R04 
標準 価格 12.000 円 
@ シス テム テス ク ( 大 ) 
MZ-1S03 
標準 価格 48.000 円 
@ シ ステ ム テ スク (りり 
MZ-1S04 
標準 価格 39.000 円 


| ステ ムッ フト ウェ ァ 


「] CP/M2.2* 
MZ-2Z006 
標準 価格 
35,000 円 


MZ-1U02 
標準 価格 20.000 円 


ーー テー JIS$ キ ー ボ ー ト 


主 三 計 Mz-iko 


標準 価格 38.000 円 


SC キー ホー ト 
MZ-1KO6 
ee 


ョ ーーー 
レー 
チル トス タン ト 


12 措 グリ ー ン ティ スフレ イ 
MZ-1DO2 


標準 価格 RU 
和信 価 絡 12.000 幅 
12 型 カラ ー デ ティ スフレ イ ゅ 
し 馬 0 
価格 163.000 門 生 灯 客 12.000 円 
ーー !6 DP 
し 一! MZ:1P02 トラ クタ ユニ ッ ト 
標準 価格 138.000 円 。 MZ 
ooos 標準 価格 12.000 円 
測 字 ドッ ト フ リン タ (132 桁 ) 
MZ-1P03 
接続 ケー ブル + ラ クタ ユニ - ト 
MZ-1C16 .MZ-6PO06 
標準 価格 標準 価格 15.000 円 
7800 円 
ァ ラ シー ト ガ イト 
ーー 当 ーーW po 価格 2.800 円 
』 回 準 価格 2., 
標準 価格 228,000 円 
ドッ ト フ リン タ (136 桁 ) 
CE-333P 
標準 価格 310.000 円 
灯 終 ケー フル 
MZ-1CO3 
標準 価格 7.800 円 
トッ ト フ リン タ 
XY フロ ッ タ (その 他 CE-330P 
RS-232C 聞 連 機 器 ) 標準 価格 
em 
ZD4 標準 価格 1.180.000 円 
RS-232C シ リア ル 標準 価格 8.000 円 
イン ター フェ イス 
MZ-1E01 
コーーー タ ーーーーーーー 音 匠 カ フラ ・ テ レタ イフ 等 
ya っ 
28,.000 円 標準 価格 4.800 円 
| ①) 各種 計測 器 
GPI 0 イン ター 接続 ケー ブル 
MZ-1E02 TTF 
標準 価格 28.000 円 シー 
ーー デーーー の ピス 
SFD イ ンタ ー ①) 
フェ イス MZ-1C21 失 終 ケー フル 
MZ-1E03 標準 価格 MZ-1C21 
標準 価格 38.000 円 9.000 円 スタ ンダ ー ド フロ ッ ヒ ー 標準 価格 グチ 4 
HHHUIHH ティ スク ドラ イブ の 
増設 RAM チ ンプ (64KB) MZ-1F05 生き 2 
waee-t(g) MPAA 標準 価 格 398.000 円 間 当 価格 398.000 円 
MZ-1RO6 標準 価格 28.000 円 094 寺 アー 
標準 価格 45.000 円 1 Mori を が し て 人 


に ーー ニー 


P お 詫び と 訂正 :9 月 号 中 MZ-3531 の 標準 価格 32.000 円 は 320.000 円 


| | CE-331M(35 ト ラッ ク ) 
リル ーー 信 準 価格 350.000 円 


MZ-!C28 を 介し て 使用 可能 


増設 ミニ フロ ッ ヒ ー テ ィ ス クト ライ フ 「MZ-354! に は 内 蔵 ) 
MZ-1F03 
標準 価格 90.000 円 


、MZ-1K06 の 標準 価格 320.000 円 は 38.000 円 の 誤り で し た 。 


IN1-(0) 表 計 算 ・ 箇 易 言語 


っ CALGO 


新 発 売 ・ 定 価 .8U ロ 円 
(特長 ) (機能 ) 


プ ァ シッ クション ワシ タッ チ 処理 コマ ンド 
で 処理 OK FI ・ 演算 定義 F6 : 項目 の コピ ー、 ク リア 
オー ル マ シ ン 語 の 高速 処理 F2 : JUMP F7 : 検索 
ソー ト 、 検 索 な ど 機 能 充実 F3 : 挿入 削除 "F8: ソ ー ト プ ブロック 
F4 : 表 F9 : 印刷 
F5 : 演算 実行 FI0 :( オ プシ ョ ン ) 
演算 コマ ンド 
十 ,。 一 , ※, 


SUM, CNT, AVE, MIN, MAX 
ABS, INT, SGN, SQR 


本 ea 
好評 発売 中 , ノ 


マジ 力 見 スゥ は 、 ス トラ ッ ト フ ォ ー ド ・ コ ンピュータ ー セ ンタ ー 株 式 会 社 ホビ ー 事 業 部 の 商標 (出願 中 ) で す 。 
スト ラッ ト フ ォ ー ド ・ コ ンピュータ ー セ ンタ ー 株 式 会 社 ホビ ー 事 業 部 〒336 浦 和 市 南浦 和 2-36-15 谷 0488(85)5222( 大 代表 ) 


Mt 


レデ ※ 最 新 ソ フト カタ ログ を ご 希望 の 方 は X1, PC-8001mk II , パソ ビア 7, FM-7, 日 立 レ ベル 3 マー ク V, 
( ア J W 9 MZ-2200, PC-6001mk II の 機種 名 を 明記 の 上 ハドソン 東京 -OH-MZ 係 ま で 〒60 円 を 添え て , お 申し 
利 ドド) り 1【 0) . 込み 下さ い 。 
に の 1 
し っ の 4J1i 
人 N / ※ 通 信販 売 は 。 ソフ ト 名 を 明記 の 上 お 近く の ハドソン ・OH-MZ 保 まで 現金 書留 に て お 送り 下さ い 。 
(送料 無料 ) 


バ ソ コン テレ ビ X1 用 ゲー ム ソ フ ト 


(C テレ ビ 朝 日 ミュ ー ミ > 
火 - 1O86 
マシ ン 語 _\3.OOO 


: 0 


め だ ガ , ご ね ご , すず め の 
きき よう だい が 繰り ひろ げ る 
楽 レ い メ ル ヘ ン の 世界 


和 を 


※PC-8001mkII,FM-7, パソ ピア 7 
も 開発 中 で す 。 


※ こ の 画面 は 、 当 社 モ ニタ ー で 撮っ た も の で 機種 に よっ て 画面 は 異な り ま す 。 


ii ハドソン 札幌 /〒062 札幌 市 豊平 区 平岸 3 条 5 丁目 4 番 17 号 コロ ナー ド 平 岸 H201 PHONE:011-821-1538 


⑯) ハハ ドン ン 仙 台 /〒980 宮城 県 仙 吾 市 宮 町 1 丁目 4 番 28 号 PHONE:0222-65-7031 
ハドソン ン 金 沢 /〒920 石川 県 金沢 市 本 町 2 丁目 1 番 28 号 PHONE:0762-23-1263 
ハ ド ン ン 東京 /〒102 東京 都 千代 田 区 麹町 4 丁目 7 番 5 号 准 町 ロイ ヤル ピル 2F PHONE:03-234-4996 
ハ ド ン ン 大 阪 /〒542 大 阪 市 南 区 南船場 4 丁目 2 番 18 号 佐野 屋 橋 ビル 5F PHONE:06-251-1945 
ハドソン USA/2063 CENTER STREET BERKELEY CA 94704 TELEPHONE 415-845-1416 
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特 別 加 月 店 現在 市 販 さ れ て いる ソフ ト の 
TTY を 


例 J&P 渋 谷 店 〒|50 東 京都 道玄坂 2-28-4 
@J&P 京 都 寺町 店 〒600 京 都市 下京 区 寺町 通り 仏 光 寺 下 ル 恵 美 清 町 5 


人 SEIYU 情 報 雑 貨 館 マ イコ ン シ ョ ッ プ comica 西 荻 許 店 

〒!67 東 京都 杉並 区 西 菊 南 3-]4-7 03-334-6311< 担 当 ・ 弘 中 ・ 山 口 > 
@ マ イコ ン シ ョ ッ プ CSK( 西口) 〒I60 新 宿 区 西新 宿 |-12-8( 鶴 業 角 刀 証 券 階 ) 03-342-190< 担 当 ・ 前 田 店 長 > 
人 @ 西 式 百 貨 店 池袋 店 マイ コン ショ ッ プ 干 || 豊 島 区 南 池袋 |-28-| 03-98 に -011I 内 線 2928< 担 当 ・ 池 田 、 鈴 木 > 
@⑯YDK シ ステ ムセン ター 和 〒!60 新 宿 区 西新 宿 2-4-! 新宿 NS ビ ル 1F 03-342-2441 く 担当 ・ 宮 本 店 長 > 
@ 第 1 家電 OA セ ンタ ー 和 〒|0| 千 代田 区 神田 佐久 間 町 |-|5 03-253-0808 く 担当 ・ 飯 田 


O 


8 ビッ ト か ら 16 ビ ピット へ . モノ クロ か ら カ ラー ディ スプ レイ 、 カ ラー ブリン ター 
へ . ハ ー ド ウェ ア の 進化 は 驚異 的 な スピ ー ド で 僕達 を 圧倒 し た そし て 1983 年 、 
時 代 は フル スピ ー ド で ソフ ト へ 。 血統 正しき エリ ー ト 機種 を ルル 才 で 終ら せる か 
天才 に 育て あげ る か 。 鍵 は ソフ トウ ェ ア が 握っ て いる 。 た いく 〈 つ だ っ た プレ イ 
タイ ム を 刺激 的 に め ぬり か える ゲー ム ソ フ ト 、 現 在 約 6000 種 。 あ ら ゆ る 分 野 で 君 
の 才能 を バッ クア ッ プ する ビジ ネス ソフ ト 、 約 1500 種 。 ハ ー ド ウェ ア に 負け な い 
土 い で 、 今 日 も 新しい ソフ ト が 生ま れ 、 育 っ て いる 。 そ の 全て が 集う 日 本 ソフ ト 
バン ク . ソ フトウェア の 流通 化 を 通し て 、 よ り エ キサ イ テ ィ ング な コン ピュ ー タ 
の 次 代 を きり 拓 き ます 


ツノ 


@ J&P メ ディ アラ ンド 和 〒556 大 阪 市 浪速 区 日 本 橋 4- |-3 06-644-1613< 担 当 ・ 山 本 店 長 > の] 衝 - 紀 2 8 

@ マ イコ ン シ ョ ッ プ CSK 〒530 大 阪 市 北 区 梅田 |-!-3 大 阪 駅 前 第 3 ピル BI 06-345-3351 く < 担当 ・ 四 元 > S ロ FT 「」 世紀 、 ヒ ュ ko を 降 代 べ 。 
@ ラ オッ クス 新宿 店 マイ コン シテ ィ 〒!60 新 宿 区 新 導 3-15-16 ラ オッ クス ピル SF 03-350-1241 く 担当 原 店 長 BAIK 株 式 会 社 日 本 ソフ ト / ンク 
コン ピュ ー タ ハウ スヤ マギ ワ テ クニ カ 〒|0I 千 代田 区 外 神田 4-3- | 03-253-0121 紅 < 担当 ・ 原 > 

信 大 塚 OA セ ンタ ー 和 八重 洲 〒|04 中 内 区 八重 洲 2-|-5 東 京 駅 前 ピル 2 03-281-471 く 担当 ・ 金 子 > 本 社 : 王 |02 東京 都 千代 田 区 九段 南 2-3-14 靖国 九段 南 ビル (03)263-3690 約 
例 J&P テ クノ ラン ド 〒556 大 阪 市 浪速 区 日 本 橋 5-6-7 06-644-1413< 担 当 ・ 勝 田 店 長 > 大 阪 支店 :〒542 大 阪 市 南 区 苑 波 千日前 5-19 河 原 セ ンタ ー ビ ル (06)644-0191 衝 


NM 9 店 PS 


人 @ り &P 灘 谷 店 〒!50 東 京都 渋谷 区 道玄坂 2-28-4 03-496-4141 
@J&P 新 宿 店 〒!60 新 宿 区 新宿 3-30-!1 新 宿 高野 第 2 ビル 地下 | 暗 03-352-3131 


@ り & じ 京都 寺町 店 〒600 京 都市 下京 区 寺町 通り 仏 光 寺下 ル 恵 美 須 町 549 075-34|1-3571 
@⑯ り &P メ ティ アラ ンド 〒556 大 下 市長 速 区 日 本 橋 4- | -3 06-644-1613 


マイ コン ショ ッ プ CSK 〒530 大 阪 市 北 区 梅田 」-! -3 大 阪 駅 前 第 3 ビル BI 06-345-3351 
@J&P テ クノ ラン ド 〒556 大 阪 市 浪速 区 日 本 橋 5-6-7 06-644-1413 


らら ロ FT 


@SEIYU 情 報 雑 貨 館 マイ コン ショ ッ プ comica 西 萩 窪 店 
〒!167 東 京都 杉並 区 西荻 南 3- 4-7 03-334-63|| 
@ マ イコ ン シ ョ ッ プ CSK (西口 ) 〒I60 新 宿 区 西新 宿 !- 12-8( 勤 業 角 丸 証券 陸 ) 03-342-190| 
人 @ 西 武 百貨 店 池袋 店 マイ コン ショ ッ プ 和 〒|71 豊 島 区 南 池袋 |-28-| 03-98|-0I1I 内 線 2928 
@YDK シ ステ ムセン ター 〒|60 新 宿 区 西新 宿 2-4- | 新宿 NS ビ ピル IF 03-342-2441 
@ 第 | 家電 OA セ ンタ ー 〒|0| 千 代田 区 神田 佐久 間 町 |-15 03-253-0808 
@⑱ コ ンピュータ ハウ スヤ マギ ワ テ クニ カ 〒!I0| 千 代田 区 外 神 田 4-3-1 03-253-0121 
@ 大 塚 OA セ ンタ ー 和 八 重 洲 〒!04 中 央 区 八重 洲 2-|-5 東 京 駅 前 ビル 2 03-281-4711 
⑯ ラ オッ クス 新宿 店 マイ コン シテ ィ 〒160 新 宿 区 新宿 3-15-16 ラ オッ クス ピル 5F 03-350-1241 
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to egaku1 
setpc 2 

at -50 (- 50) 
polysp1 100 62 
end 


to polysp1 :side :angle 
1f :side < 2 stop] 
setpc pc + 1 


fd :size 
rt :angle 


polysp1 :side - 1 :angle 
end 


開発 ・ 発 売 元 : 


問い 合わ せ 先 : 


1f ((remainder pc 8) = 0) [setpc 2) 


to egaku2 
home 

rt 45 
hishigata 15 0.1 
It 180 
hishigata 15 0.1 
setscrunch 1 

end 


to hishigata :n :s 

1f :n = 0 [stop] 

repeat 4 [fd 100 rt 90] 
setscrunch :s 

hishigata :n - 1 :s + 0・3 
end 
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費 日 本 ソフ トバ ンク MZ LOGO 係 〒I02 東京 都 千代 田 区 
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秋 の 夜 に 贈る ーー 一 欠 


ーー 外 和 2 ノ 


の すう キ * "イル 
ENTER CONHRND ? 待 


⑥ さ , これ が 問題 の うさ ぎ さ ん 。 と どう 対 
処す る ? | “ 


了 』 さあ , ゲー ム の 開始 だ 。 


メデ ナ 27 チ 7 !! 
CoHMAND 2 N 
COHHND' う 研 


そっ フ "のり" 了 %s 
ENTER CONHRND ? 午 


は な か な か 切符 を 売っ て くれ な いよ う 
が 


呈 


@ 駅 に 出 た 。 汽車 が 待っ て る よう だ か ら , マイ クロ キャ ピン 二 
や っ ぱり どこ か に 行き た いね 。 MZ-2000/2200 用 ディ スク 2 枚 組 12,800 


行き た い の は や まや ま , で も クマ さん 


第 1 回 アド ベン チャ ー ゲ ー ム コン テ 
スト , 優秀 賞 受 賞 作品 


ピラ ミッ ド の 謎 


』 人 Command 


nu も Command 
?「 罰 


ビ ピラミッド の 内 部 に 入る 。 何 か 像 の 頭 
で 輝 や くも の が 。 


⑥ この 迷路 の 細か さ 。 ぬ ける の に まず 2 
時 間近 く は か か る だ ろう 。 


⑥ 湖 に 出る と 恐竜 が 出現 , 何と か し な し 


く で は 。 


マジ カル ズ ッ ゥ (スト ラッ ト フ ォ ー ド ・ コ ンピュータ ー セ ンタ 
ー 株 式 会 社 ホビ ー 事 業 部 ) X1 用 ディ スク 版 5,800 円 


⑳⑯⑩ や , 建物 の 向こう に 何 か あ る よう だ が 


の 上 呈 て Command 


N 
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( 9 ⑱ みごと な 神殿 が 現われ た 。 中 に 入っ て 
. 補 SEI 。)= に = >/ せ … 
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E Push Spaoe-Bar To Cont- ] 


6 @⑯ 何 か 映 画 を 見 て いる よう 

PAN Vo コ ベ 。 字幕 が 流れ て , 
eo KOMIOH NEISHH END, さあ , ここ まで 行 
きつ ける か な ? 
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SPRCE BLOCKI3=D12= に 18= 燈 | 4= に 15=- 16=-17 ア = 


9 SPACE CITY を 守れ / 
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QW デモ 画面 。 な か な か きれ い だ 。 


⑯ 短 距 離 セ ン サ ー で , 宇宙 基地 の 位置 を 
確認 。 


Q 宇宙 基地 に 到着 。 


宇宙 シミ ュ レ ーション は , スタ ー ト レッ ク 
ー ト / 日 に 始ま り ス ター フリ ー ト て で 感激 する 


らら Tz む DdTc 
旧 男 15 弓 1Lc ー1 


⑳ 敵 エ イリ ゴン 艦 , 来襲 。 


ンス ン | 。 
X1 用 テー プ 版 4,500 円 


MZ:80k<C/1200700 
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@ 第 7 面目 。 こ こま で いく と も う 達 人 。 
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フチ フカ リン 了 キ ) セ "  J セラ ァ イ 《Y ノ N) 


⑱ 1944 年 , ソロ モン カイ イキ と ネー ム の ⑳ 海域 図 を 見 な が ら , 敵 潜水 艦 を 見 つけ ゆ さあ 見 つけ た が , 急 雷 は 外れ て し まっ 
入っ た タイ トル 画面 re 始 語 むう | 度 チ ャ レン ジ 。 


| 
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⑳ ビー ム 発 射 。 3 次 元 で 処理 し て いる 
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ング - 
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か 
ら , 命中 させ る の が た い へ ん 。 
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】 3 1 
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BBBE 盟 
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電電 うき タラ "イマ トク テン サイ ダン チュ ウ の 
トラ に ョ ウラ” nm イ 


信二 演 且 馬見 当 中 生地 


4 に 』 
4 2 


⑳ 2 ソ 待 ち で て で,。 あ が り / 


いち ば ん 確率 の 大 きい と ころ で 


9 親 だ っ た か ら 得 点 は 9600 点 。 


で の 、 
np 


・X1 に さわ っ て みな いか 


1 

2.How to タッ チ X1 / 

3 . プロ グラ ム を 作ろ う 

4 . X1 お も し ろ グ ラフ ィ ッ クス 

5 . ビジ ネス セク レタ リーX1 

6 . X1 と 遊ぼ う 

7 .X1 ミ ュー ジッ クハ ウス 
X 1 の 多彩 な 機能 を 存 分 に 発揮 させ る た め に 開発 され た だ 、 8 . X1 機 能 の いろ いろ 
rSHARP Hu BASIO」 を 平易 に 解説 。 初 め て コン ピュ に 
ー ダ に ふれ る と いう 方 ひら 、 あ る 程度 BASIC を 知 つ てい O 便 利 情報 「 ら ん だ むめも 」 
る 訪 ま で を 対象 に 、 簡 単 な マ シン 語 ま で も 実際 の 例 を 挙 げ O エ ラー メッ セー ジ 便 利 表 
な が ら 少 し ずつ 確実 に 理解 を 深め る よう 構成 これ て いま す 。 O キ ャ ラク タコ ー ド 表 


ーー 一 各 ペ ー ジ を 10 進 法 。2 進 法 , 16 進 法 で 表記 


著 者 : ストラット フォ ー ド C.C.C. ノ 鍛 誠 : 貝 日 本 ソフ トバ ンク 出版 部 合 03(261) 4095 


OO 人 アグ 


特集 秋 の 夜 に 贈る ゲー ム プ ログ ラム 


特選 ゲー ム 画 面 集 


@MZ-700(Hu-BASIC) ゲ ー ム プロ グラ ミン グ の 考え 方 


NAKE 避 APPLE 青木 才 


@MZ -700(Hu-BASIC) 


駆逐 艦 秋風 有野 下 


@MZ -700( マ シン 語 ) 


SPACE FIGHTER 人質 


人 @ ス ペー ス ア ド ベ ンチ ャ ー の 古典 に 挑戦 し よう 


人 科 衝 上 T AH TREK 杉浦 男 一 


@MZ-2000/2200(G-RAM 1 , II, 皿 ) 


SPACE SHIP 紅木 沙 人 


@MZ-700 (Hu-BASIC) 


ふた り の マー ジャ ン 成長 する プロ グラ ム 福田 浩介 


條 絵夢 絶 登 面白 玉手 箱 
アド ベン チャ ー ワ ー ル ド へ の 招待 有田 際 
@AROUND THE BASIC 


入力 ルー チン の 設計 有人 上 


@Dr.Ku の ハー ド 入門 


RHOUM ラ イタ ・ コ ント ロー ルプ ブロ グラ ム まま 5 緒 


候 Z-80 機 械 語 へ の 誘い 


マシ ン 語 ・ 魔 神 語 ・DEUS EX MACHINA gz 
…MZ-2000 プ 2200 マシ ン 語 に 挑戦 し よう / 

BASIC デバ ッ グ ツー ル 小笠 原 吉 義 
@ コ ンピュータ と 人 工 知能 


入門 MZ LOGOD と リス ト 理 szsjo= 


人 @ ケ ー ス スタ ディ 教室 て 活躍 する MZ 


子供 が 待ち こ が れ る 授業 本 
特別 企画 Oh / CZ 創刊 号 

漢字 ワー ド プ ロ セ ッ サ 火 1 -WFD イラ ティ リッ タ ポ ー ン 
SPACE PATROL Elder Man 
強化 実践 教室 内 秀則 
CHECKSUM SYSTEM 幼 人 部 


表紙 原画 / マ ジッ ク ・ バ ス 
表紙 写真 / 浜 崎 昭 


@CP ン M.CP ン M-86. MP/M は Digital Research 
社 


@MS-D0S は Microsoft 社 

⑯FLEX は TSC 社 

@ り UCSD p-System は カル フォ ルニア 大 学 理事 会 

@RACET NEODOS は RACET COMPUTES 社 

@⑯SB-80.SB-86 は LIFEBOAT ASSOCIATES 

'⑯WORDSTAR,MAILMERGE, SPELLSTAR、 
WORDMASTER、CALCSTAR,DATASTAR、 
SUPERSORT、 JINF0STAR は MiorerPro 社 の 宮 
メー カー の 登録 商 棟 で す 。 2 
その 他 プ ログ ラム 名 。 シス テム 名 CPU 
前 に 各 開 発 メー カー の 登録 商標 で す 。 6 6 
本 文中 で は "TM"⑯" マ ー ク は 明記 し て いま せん 。 

本 計 掲載 の プロ グラ ム は 。 個人 で 利用 す 8 


は 著作 権 法 上 。 押 所 複製 を 禁じ られ て い 


シャ ー プ 新 製品 情報 
読者 か ら プ 掲示 板 
愛読 者 プレ ゼン ト 

べ ぺんぎん 情報 コー ナー 
SOFT TOUCH 

Oh / MZ 質 問 箱 
PUZZLE BOX 

ご めん な さい の ペー ジ 


MZ-700 (Hu BAsic) 


HI 反 SNAKE & APPLE 


だ たま に は ゲー ム も いい も の だ 


AppleIlI の TV ゲー ム に スネ ー ク ・ バ イト 
と いう ゲー ム が あり ます 。 その ゲー ム を 筆 
者 も や っ て みて , 機能 を いく ら か 減ら せ ば 
BASIC で 書い て も 十分 遊べ る (スピ ー ド 的 
に で す ) と 考え て , 作っ て み ま し た 。BASIC 
で 記述 し , 特殊 な グラ フィ ッ ク コ マン ド は 
- 一切 ない MZ-700 を 使っ て いま すか ら , 他 
機種 へ の 移植 も 容易 で 、 その マイ コン に 応 
じ て , ゲー ム の 機能 を ふやし た り 減 らし た 
り で きま す 。 実際 筆 者 は Canon の AS-100 に 
2, 3 日 で 移植 し , 研究 琶 の みん な の 意見 に 
従っ て 手 を 加え て いま す 。 その と き の 感 触 
か らい っ て も 移植 は 容易 ど と 思い ます 。 


人 盟 ” ケー ム の 内 容 


スネ ー ク バイ ト の 目的 は た だ ひと つ , 画 
面 に 表示 きれ て いる アッ プル を , スネ ー ク 
を あや つっ て た くき ん 食べ る こと で す 。 ア 
ッ プ ル を 1 個 食 べ る ご と に 点 が ふえ ます 。 る 
し て 食べ る ご と に スネ ー ク の 体 が の び ま す 。 

ひと つの アッ プル を 食べ て , 次 の アッ プ 
ル を 食べ る まで の 時 間 に は 制限 が あっ て , 
制限 時 間 を 過ぎ る と アッ プル が 1 個 ふ えま 
す 。 1 個 も ふえ な けれ ば , 10 個 食べ た 時 点 
で ボー ナス が つき ます 。 制限 時 間 を 過ぎ て 


配列 ポイ ンタ 


2 の OoniMz 1983.10. 


ゲー ム ブ プロ グラ 


CC て YYTYTYYYYY 


1 個 ア ッ プ ル が ふえ だ た と する と , 次 の 面 で 
は 最低 11 個 の アッ プル を 食べ な いと その 次 
の 面 に は 進め ませ ん 。 面 が ひと つ 進 むと ス 
ネー ク が 1 匹 ふ えま す 。 

スネ ー ク を 動か す に は キー ボー ド の カー 
ソル キー を 使い ます 。 何 も 押 き な いし と 現在 
向い て いる 方 向 へ ズン ズン 進み ます 。 
壁 に ぶつ か っ た り , 自分 の 体 に ぶつ か る と 
ゲー ム オ ー バ ー で す 。 


人 角 リン の ツラ ファ 


ゲー ム 構 成 の 基本 で ある スネ ー ク の 実現 
方 法 を 説明 し た いと 思い ます 。 

頭 の ほう は , 現在 進む 方 向 に ひと つ 伸 ば 
し ます 。 現在 進む 方 向 は , キー 入力 に 応じ 
て 変化 きせ ます 。 尾 の ほう は ひと つ ず っ つ 消 
し て いき ます 。 消す た め に は 現在 , し っ ぽ が 
どこ に ある か を 覚え て お か ね ば な り ま せん 。 
どこ と いう の は 画面 の 番地 を 意味 し ます 。 


1 
豆 


次 の 瞬間 に は 赤字 の よう に な り , 
ポイ ンタ は 先 へ と 進む 


ング の 考え 方 


FY て TYYYYTTYTYYYYYYYYY 


画面 は 一 種 の メモ リ だ と 考え て よく て , 
メモ リ の 内 容 に 応じ て 文字 や 図形 が 出る と 
考え られ ます 。MZ-700 で は ひと つの 文字 
に 対し て 2 つの メモ リ が 対応 し て いま す 。 
ひと つ は 左上 隅 の 番地 が &HD000 か ら 始 ま 
る V-RAM で その 内 容 と 文字 の 対応 は マニ ュ 
アル の P211 と P212 に ある ディ イス プレ イコ 
ー ド 表 に 書い て あり ます 。 ひ と つの メモ リ 
は 8 ビッ ト で すか ら そ の 内 容 は &H00 一 &H 
FF ま で な の に 表 が 2 枚 あ る の は , 1 つの 文 
字 に も う ひ と つ メ モリ が 対応 し て いて , そ 
ちら で 表 を 切り 換え る よう に な っ て いる か 
ら で す 。 色 も その メモ リ で 決定 し ます 。 こ 
れ が P.187 の 色情 報 テ ー ブ ル で す 。 

画面 に スネ ー ク を 表示 する に は 直接 V-R 
AM に 書き 込み ます 。 で すか ら 尾 の 位置 と し 
て , V-RAM の 番地 を 覚え て おけ ば 良い の で 
す 。 頭 は や が て 尾 に な る わけ で すか ら , 頭 
を 書き 込ん だ と き に を その 位置 も 記憶 し ます 。 


単純 に 配列 に ポイ ンタ を 使っ て 覚え を た の で 
は メモ リ が いく ら あ っ て も 足り ませ ん ( 図 
1 )。 を こ で 論理 的 に この 配列 (バッ ファ と 
呼び ます ) を リン グ 状 に すれ ば 足り な く な 
る こと は あり ませ ん 。 論理 的 に . と いう の 
は , ポイ ンタ が 配列 の 最後 ま び きた と き に , 
最初 に 戻す こと を 意味 し ます ( 図 2)。 も ち 
ろ ん リ ング の 大 きき を あま り に 小 き くし て , 
スネ ー ク の 長き 以下 に な っ た りす る と た い 
へ ん な こと に な り ま す 。 尾 ポイ ンタ を 頭 ポ 
イン タ が 追い 越し て し まう の で す 。 で すか 
ら 。 リ ング バッ ファ の 大 き さ る は , 最低 で も 
スネ ー ク の 最大 長 ど だ け は 必要 ど だ と いう こと 
に な り ま す 。 画面 に は 最大 1000 文 字 し か 出 
ませ ん の で , 1000 程 度 の 配列 を と っ て お け 
ば よい し ょ う 。 リ ング パ ッ シ ア は キュ ー 
選 な っ て いる に と を 覚え て お きま し ょ う 。 

何かと 役に立つ と 思い ます 。 


錠 ゲー ム の や の 方 


リス ト ど お り に 入力 し た あと に RUNICRI 
で す 。 スネ ー ク を 右 へ 動か し た いと き は 貴 
キー を 押し ます 。 左 な 6 思 上 な ら [ 和 1 下 
な ら 6[LI で す 。 


と 4 ゲー ム の 拡張 な ど 


面 の 数 は , この リス ト で は , 9 面 め まで 
に な っ て いま す が , ゲー ム に 上 達し て 9 面 
めも クリ ア し た 人 は , 自分 で 障害 物 の デー 
タ を 作成 し て くだ さい 。 デ ー タ の 構成 は プ 
ログ ラム 解説 を 読ん で くだ さい 。 自 分 で 作っ 
た DATA 文 は 1960 行 目 以降 に つけ 加え,1860 
の 次 (1861 行 etc) に "RESTORE く < つけ 加 ぇ 
た 行 番号 > : GOTO260" も つけ 加え ます 。 さ る 
ら に , 1960 行 の ON GOTO 文 の 中 の 行 番号 
の 最後 に, “<RESTORE 文 の 行 番号 >" を つ 
け 加 えれ ば OK で す 。 

た と えば 図 3 の よう な パタ ー ン を 10 面 め 
に する し とき は , 

1960 DATA1,11,16.20,11,18,0,18,1,9,18,13,10,0 

1861 RESTORE1960 : GOTO 260 

1690 MUSIC“-C5" : ON MEN GOTO 1780,1790, 
1800,1810,1820,1830,1840,1850,1860,1861 

の 3 行 を つけ 加え る (1690 行 は 追加 ) こと 

で 10 面 め に 図 3 の パタ ー ン が 表 わ れ ます 。 

ゲー ム を 難 か し くす る に は , 2 と お り の 
方 法 が あり ます 。 ひ と つ は , 制限 時 間 を 短 
くす る 方 法 で す 。 それ に は , WL を 小さ くす 


る と よい で し ょ う 。 も う ひ と つ は ,。 スネ ー 
ク の 伸び る 量 を 大 きく する 方 法 で す 。KL 
を 大 きく する と 1 回 に 伸び る 量 が 大 きく な 5 
ます 。 これ ら の 変数 を レベ ル ( 入 力 す る よう 
に し ます ) に 応じ て 変え て も よい で し ょ う 。 

レベ ル を 入力 する の で あれ ば , アッ プル 
の 点数 を レベ ル に 応じ て 変え て みる の も よ 
いで し ょ う 。 何人 か で 楽し 『 の で あれ ば , 
ハイ スコ ア を 登録 どき る よう に する の も お 
も し ろ い と 思い ます 。 

キー 配置 が カー ソ ツル キー で は いや が , 
と いう と き に は , キー の 個数 だ け の 配列 を 
と っ て , 押す ナ キ ー の アス キー コー ド を 添字 
と する 配列 に 1, 2, 3.4 を 入れ て お き , 911 行 を , 
910 ON KY(ASC(D$)) GOTO 960, 950, 
930,.940 と すれ ば よい で し ょ う 。 だ た と ぇ ば , Q 
を 上 , A を 下 , K を 左 , し を 右 と する の で 
あれ ば , 最初 に KY(65) =3, KY(81) =4, 
KY (75) 1, KY(76) 三 2 と する の で す 。 

ハイ スコ ア を 登録 どき れ ば , さら に 面 日 
く な る か も し れ ま せん 。 考え て みて くだ さい 。 


人 銀 ” フロ プラ ム の 解説 


10 : 変数 は すべ て INTEGER (16 ビ ッ ト ) で 


充分 な の て 実行 速度 を 上 げ る た め に D 


EFINT 宣 言 を し ます 。 
20 : SB が リン グ バ ッ フ ァ 用 の 配列 で す 。 
40 一 230 : 面 が 進ん で も 変え る 必要 の な い 定 
数 を 変数 に 代入 し ます 。 定数 を 変数 に 
代入 し て お ぉ 〈. こ と の 利点 の ひと つ は プ 
ログ ラム が 読み や すく な る こと (この 
プロ グラ ム で は それ ほど で も あり ませ 
ん が 。) も う ひ と つ は , 実行 速度 が いく 
ら か 速く な る こと で す 。 
BL 色情 報 テ ー ブ ル で 青色 を 意味 する 。 
RD 7 赤色 ヶ ヵ 
PP / 紫色 ヶ 


GR 色情 報 テ ー ブ ル で 緑色 を 意味 する 。 
LB / 水色 4 
YL 7 黄色 
POINT 得点 を 記憶 する 変数 。 
BA 文字 V-RAM 画 面 左 上 隅 の アド レス 。 


BAC 色 V-RAM / 
BLK 障害 物 ( ブ ロッ ク ) の ディ スプ レ 
イ ーー ド 。 


APL アッ プル の ディ イス プレ イコ ユ コード 。 
BCOL ブロ ッ ク の 色 。 
LN 画面 1 行 の 文字 数 。 
SN スネ ー ク の ディ スプ レイ コー ド 。 
TA を その 面 で 食べ な けれ ば な ら な い 
アッ プル の 総数 , 最初 は 10 個 。 
MEN 現在 何 面 目 か を 記 境 する 変数 。 
WL 制限 時 間 を 決め る 。1010 行 以下 
を 参照 。 
SL スネ ー ク の 残り 数 。 
KL アッ プル を 食べ た と き に スネ ー 
ク の 体 が 何 個 分 伸び る か を 示す 。 
PR アッ プル 1 個 当り の 得点 。 実 際 
に 表示 され る 得点 は POINT * 
PR と な る 。 
240 : デー タ 文 の 初期 化 。 
260-380 : 下図 の よう な 枠 を 画面 に 描く 。 


D000 | D00I D026 |D027 
D800 | D80I D826 |D827 
D028 | D029 DO04E |D04F | 
D828 | D829 D84E | D84F 


400 一 580 : DATA 文 の デー タ に 従っ て 障害 物 
を 画面 に 描く , 1 面 分 の デー タ は 次 の 
よう に な っ て いる 。 

特集 SNAKE & APPLE クア 


K 横 方 向 の デー タ 》0,K 縦 方 向 の デー タ 》10 
< 横 方 向 の デー タ > も < 縦 方 向 の デー タッ > 
も 同じ 形式 で ある 。 
く <x 座 標 >。 <y 座 標 ?,、 く 長き > 
つま り 点 (x。y) か ら 右 方 向 も し は 
下方 向 へ く 長 > 分 の 障害 物 を 描く 。 x 
また は y が 0 に な る こと は な い ( 枠 が 描 
いて ある か ら ) の で 0 を 区 切り 記号 と 
し で 用 いて よい 。 

た と えば 下図 の よう な 長方形 は , 

(3, 3) 


9.3.6.3.760.3.4.3.8.4.3.0 
と いう デー タ を 与え る こと で 描け る 。 
デー タ が な く な っ だ た と き の た だ め に , 
エラ ー が 起こ っ た と き に は 570 行 に 行く 

よう に , と いう 指示 を 400 行 で 行なっ て 

いる 。 570 行 で は , RESTORE を 実行 

し て エラ ー か ら 回 復 す る 。 

590 : 1450 行 か ら の サブ ルー チン は , アッ プ 

ル を 1 個 表 示す る も の 。 

600 一 720 : 変数 の 初期 設定 。 

AP その 面 で 食べ な けれ ば な ら な い ア 
ッ プ ル の 数 。 制 限 時 間 を 過ぎ る と 
1 ふえ る 。 

XH スネ ー ク の 頭 の x 座標 。 

YH ル y 座標 。 
最初 スネ ー ク は 画面 下 中 央 か ら 出 
て る 。 

CO 現在 の スネ ー ク の 胴体 の 色 。 進 む 
方 向 に よっ て 変化 する 。 最 初 は 上 
向き な の で 緑 (GR) 。 

KK この 変数 が 正 の 間 , 尾 は 動か ず 頭 
だ けが 進む の で スネ ー ク の 体 が 伸 
びる 。 

XV x 方 向 の ベク トル 。XH+XV で 次 
の 頭 の x 座 標 が 得 ら れる 。 

YV 方 向 の ベク トル 。 YH+YV て 次 の 
頭 の y 座標 が 得 ら れる 。 

最 最初 は 上 向き に 進む の で XV= テ 0 


YU テー1 

右 : XV=1, YV=0 
左 : XV テ ー1 , YV テ 0 
上 : XV=0 , YV ニ ー1 
下 : XV=0 , YV テ 1 


HP リン グミ ッ フ ァ の 頭 を 指す ポイ ンタ 。 
TP リン グ バ バッファ の 尾 を 指す ポイ ンタ 。 
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WC 何 歩 進 ん だ か を 覚え る 。 WL に 達 
する と 0 に 戻る れる 。 

FG 制限 時 間 を 越え を た か どう か を 示す 
クラ グ 。 1 で 越え だ さと を 示す 。 

HS 画面 に 表示 され て いる アッ プル の 
数 を 示す 。 

SY 制限 時 間 を 表示 する た め に “*” を 
描く y 座 標 を 示す 。 

730 一 770 : 画面 の 右端 に 制限 時 間 を 示す “*" 
を 11 個 描く 。 表 示さ れ た “* "は これ 以 
降 , 変化 し な い 。 

780 一 790 : 画面 中 央 下 に スネ ー ク の 頭 を 描く 。 
780 行 で グラ フィ ッ ク パ ター ン を , 790 
行 で 色 を V-RAM に - 書き 込ん で いる 。 

800 : リン グ バ ッ フ ァ の 最初 に 番地 を 代入 。 

810 : 頭 の ポイ ンタ を ひと つ 進 め る 。 一 般 に , 
スネ ー ク の 番地 と ポ イン タ の 関係 は 下 
図 の よう に な っ て いる 。 


| 地 | 地 3 | 地 | | 
1 1 


TP HP 


つま り , HP は 次 に 番地 を 代入 すべ き 位 
置 を 指し て いて , TP は 次 に 消去 すべ き 
尾 の 位置 を 指し て いる 。 
820 一 880 : (820 行 は 不用 。) 画面 の 一 番 下 の 
行 に , 得点 、 残 り の アッ プル の 数 , 残 
り の スネ ー ク の 数 を 表示 する 。 す で て 
の PRINT 文 に : が 必要 で ある 。 こ れ を 
を 忘れ る と , 画面 が スク ロー ル ア ッ プ し 
て , せっ かく 〈 作 っ た 枠 等 が ダメ に な る 。 
890 : 以下 の こと を , スネ ー ク が ぶつ か る か , 
アッ プル を すべ て 食べ る まで 繰り 返す 。 
900 : キー ボー ド か ら 1 廊 字 DS に 読み 込む 。 
910 : DS の 内 容 に 応じ て 処理 を 変え る 。 こ 
こ で は DS に 応じ て スネ ー ク の 向き を 変 
える 。 カ ー ツ ルキ ー の アス キー ュ コード 
は , 
皿 28 円 29 人 田 30 
で ある 。 
920 : カー ソル キー 以外 の キー が 押さ れ て い 
た か , 何 も 押 きれ て いな いと き に は こ 
の 行 を 実行 し て 970 行 へ 飛ぶ 。 
930 : スネ ー ク を 上 に 動か す た め の 処理 。 
940 : スネ ー ク を 下 に 動か す た め の 処理 。 
950 : スネ ー ク を 左 に 動か す た め の 処理 。 
960 : スネ ー ク を 右 に 動か す た め の 処理 。 
970 : KK を 1 減ら し , 負 の 数 に な っ た ら 0 に 
し て いる 。 こ の 式 の 中 で 後ろ の の カッ ュ 
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(KK> 0 ) は 論理 式 で あり 正しい と き 
は 一 1, 正しく て ない とき は 0 の 値 を と る 。 
この 行 は 次 の 2 行 ほ 同じ こと 。 

KK ニーKK 一 1 

IF KK ぐ 0 THEN KK=0 

980 : 次 に 頭 を 描く べき x 座 標 の 計算 。 

980 : 7 y / 
キー 入力 が な けれ ば 以前 の XV, YV を 
保持 し て いる の で 以前 と 同じ 方 向 へ 進 
むこ と に な る 。 

1000 : 1 歩 進む の で WC を 1 ふやす 。 

1010: も し WC が WL に 達し た ら 1020 一 1050 
を 実行 する 。 

1020 : まず WC を 0 に 戻す 。 

1030 一 1050 : 制限 時 間 が 1 単位 減っ た こと 
を 示す た め に SY を 1 へ らし て SY を y 座 
標 と する 右端 に "*" を 1 つ 描 〈。 

1060 : SY が 0 以下 ,、 つまり, “*" が 左端 1 
列 い っ ぱい に な っ た ら , つま り 制 限 時 
間 に な っ た ら 1070 一 1130 を 実行 する 。 

1070 : 制限 時 間 を 越 を た の で フラ グ を 立て る 。 

1080 : 1 面 の あい だ に 食べ る アッ プル の 最 
小 の 個数 が 1 ふえ る 。 

1090: 残 0 り の アッ プル 数 も 1 ふえ る 。 

1100 : 残り の アッ プル 数 を 画面 下 に 表示 。 

1110 : アッ プル を 1 個 表 示す る サブ ルー チ 
ン を 呼ぶ 。 

1120 : 右端 の "* "の 上 半分 を 消す 。 

1130 : SY も 画面 中 央 あたり を 指す よう に す 
る 。 

1010 行 か ら 1130 行 まで が 制限 時 間 用 の 
アル ゴリ ズム で ある 。 ス ネー ク の 歩数 
を WC で 数 ぇ , WL に 達し た ら SY を 1 
へ ら す と いう こと を 繰り 返し ,。 や が て 
SY が 0 に な っ た と ころ で 制限 時 間 い っ 
いと いう こと に し て いる 。 スネーク 
が 1 個 $ も アッ プル を 食べ ず に 歩け る 歩 
数 は 

(13 一 1) X WL 三 12 X5=60( 歩 ) 

Y の 初期 値 と な り ま す 。 

1140 : 次 に 頭 を 描く は ず の 番地 を PS に 代 
入 。 

1150 : DS 番地 に ある 文字 の ディ スプ レイ コ 
ー ド を IS に 代入 。 

1160 : IS が ブロック や スネ ー ク だ っ た ら , 
ぶつ か っ た の だ か ら 1670 行 へ 行く 。 
1170 一 1180 : そう で な けれ ば , 何 も な い の 

か 。 アップ ル が ある の だ か ら と りあ を 


ず 頭 を 書き 込む 。 
1190 : リ ング バッ ファ に も 番地 を 代入 。 
1200 : 頭 ポ イン タ は ひと つ 進 め る 。 
1210 : 頭 ポ インタ が 配列 の 大 きる を 越 えて 
いた ら 1 番 前 に する 。 こ れ で リン グ バ 


ッ フ ァ に な る 。 
1220: アッ プル だ っ た と ときには, 1300 行 か 
ら の サブ ルー チン を 実行 し て ルー プ の 


先頭 (900) に 戻る 。 尾 は 動か す 必 要 が 
な いこ と に 注意 する こと 。 

1230 : 尾 を 動か す 必 要 が ある か どう か を , 
KK が 0 か どう か で 判定 し , 必要 な けれ 
ば ルー プ の 先頭 へ 戻る 。 

1240 : 消す べき 番地 も リング バッ ファ か ら 
取り 出し て CT に 代入 。 

1250 : 尾 ポ イン タ わ 進め る 。 

1260 : 配列 の 大 きる を 越え て いれ ば 1 に 戻す 。 

1270 : CT 番地 に 0 を 書き 込む と , 0 は 空自 
を 意味 する ディ スプ レイ ュー ド な の て 
スネ ー ク の パタ ー ン が 1 個 消 を る 。 

1280 : ルー プ の 先頭 へ 戻る 。 

1290 : アッ プル を 食べ た と き の 処 理 ル ー チ ン 。 

1300 : 音 を 出す 。 

1310 : 点 も 1 加え る 。 

1320 一 1340 : 得点 を 画面 の 下 に 書く 。 

1350 一 1370 : 制限 時 間 を 初期 化す る 。 右 端 
の "* "を 消す 。 

1380 : 尾 を 伸ばす 量 を KL だ け ふ や す 。 

1390 : 1 個 ア ッ プ ル が 消 を た た の で HS を 1 減 


DEFTINT 人 一 Z 
DINM SB(1O00) 
才 . も する すす る る も 1 
BL=&H10 
RD=&H2O 
PF=&H3O 
GSR=&H4O 
LB=&HS5O 
YL=&H6O 
FINT=Q 
Ba=&HDOOO 
BAC=&HDB ヨ QO 
BLK=&H4 さ 
PL=%&H4 ア 
ECDL =BL 
LN=40 
SN=255 
TaA=1Q 
NMEN=1 
ML=5 
5L=1 
KL=6 
FR=10 
RESTORE 


ジョ キ セ ゅ テイ 


"水玉 水玉 氷 氷水 力 フ メー / ョ キ セリ エイ ボ 水 玉水 水 水玉 


CLS 


ら す 。 

1400 : 残り の アッ プル 数 も 1 減ら す 。 

1410 一 1420: 残 り の アッ プル 数 を 画面 下 に 
表示 。 

1430: も し 残り の アッ プル 数 が 0 な ら , す 
べ て 食べ た こと に な る の て で 面 を 進め る 
処理 ルー チン (1540 行 か ら ) へ と ぶ 。 

1440 : も し 画面 に アッ グル が 残っ て いれ ば , 
アッ プル を ふやす こし と な く 戻 る 。 

1450 : 1480 行 まで の 間 を 繰り 返す 。 

1460 : アッ プル を 出す x 座 標 を 乱数 で 決め る 。 

1470 : 際 y / 

1480 : 画面 の (xy) に 何 も な いか どう か 
を 調べ , “ 何 も ちな く な る まで 乱数 を 繰り 返 
し 発生 きせ る 。 

1490 一 1510 : (RNX,RNY) に アッ プル を 赤 
色 で 表示 する 。 

1520 : アッ プル が 1 個 画面 に 出 た の で HS 
を 1 ふやす 。 

1530 : 戻る 。 

1540 一 : 1 面 終了 時 の 処理 

1550 : 昔 を 出す 。 こ の MUSIC 文 は 適当 に 作 
っ た も の な の で 各自 工夫 し て ほし い 。 

1560 : FG が 0 で な けれ ば ボー ナス は な し 。 

1570 : 点数 を アッ プル の 総数 分 加え る 。 

1580 一 1590 : ボー ナス を 画面 に 表示 。 

1600 : FG を 0 に 戻し て お 〈 ( 面 が 進む か ら )。 

1610: スネ ー ク を 1 臣 ふ や す 。 

1620 : 面 を ひと つ 進 め る 。 


1630 : 現在 まで の 得点 の 表示 。 

1640 : 時 間 つ ぶし 。 

1650 : 面 の 初期 化 へ 戻る 。 

1660 一 : スネ ー ク が 障害 物 か 自分 自身 に 
ぶつ か っ た と き の 処 理 。 

1670 : スネ ー ク を 1 区 ふ や す 。 

1680 : スネ ー ク が 0 匹 な ら , ゲー ム 終 了 1720 
行 へ 。 

1690 : ぶつ か っ た 音 を 出し て , 面 に 従っ て 
障害 物 の デー タ を RESTORE す る 。 
1700 : 用 意 し て いる デー タ 数 以上 の 面 に 進 
ん だ と き に は 面 を 1 面目 に 戻す 。 

1720 : ゲー ム 終 了 の 音楽 を 鳴ら す 。 

1730 一 1750 : も う 1 度 や る か どう か を 嘆 ね る 。 

1760 : キー 入力 が “N" 以 外 の と き は 100 行 へ 。 

1770 : これ で お 尼 ま い 。 

1780 一 1860 : 面 に 応じ た デー タ に する た め 
の RESTORE 文 。 

1870 一 1950 : デー タ 。 


FOR 1T=O TO 38 
FORKE &HDB ヨ OO0+1。 BE ロ L 


ボボ 玉水 東 


PUKE &HDB9B+1 』 BEOL 


FUKE &HDOOQ+1 。 BLK 
FUKE &&HD39 日 +1 。 BLK 


NEXT r 


FOR T=O TO 23 

FORKE szHDBOO+ ILN。BCOL 
FDRKE HDB26+T*LN。 BC ロ L 
FORE SHDQOOO+T LN。 BLK 
FURE &HDO26+ITXLN。BLK 


NEXT 
謝る も る も も る?1 


ジョウ カ ” イフ リー ヒョウ 5 リド 水玉 氷 率 水 ポポ 


UN ERRR GOTH 57QO 


READ Da 


IF DA=O _ THEN 4909 

READ DE,DL 

FOR IT=1 TO DL 

FURE (BR+LNXDB+D 人 Ra+ エ ー1 ) 。 BLK 
FUKE (BaC+LN*KDH+DQ+ エ ー1 ) 』 BCHL 


NEXT 1i 
GT 4109 
RERD DA 


IF Da=O THEN 59O 


RERD DB。DL 
FOR 1=1 TO DL 


特集 SNAKE & APPLE 2 の 


FDKE (BA+LN* (DB+ エ ー1 ) +Da) 。 BLK 
POKE (BAC+LN*(DB+ エ ー1 ) +DA) 。 BCOL 
NEXT 1 、 

GT 49O 

RESTORE 

RESUNE 

BOSUB 145O 

AP=T^ 

XH=19 

YH=22 

CO=GR 

KK=1O 

XV=O 

YV=-1 

HP=1 

TP=1 

MC=O 

FG=O 

HS=1 

BY=1 さ 

COLOR 7 

FOR 1 エ =1 さ TO 2 

LOCATE さ 9。1 

PRINT "*"5 

NEXT 

POKE &HD さ B さ 。 SN 

POKE SHDBB さ 。CQ 

SB (HP ) =&HD さ 日 さ 

HP=HP+1 

COLOR 7 

LOCATE 0。24 

PRINT "SEDRE"iPUINTXFR: 
LOCATE 1 さ 。24 

PRTNT "aPPLE"iAP5 
LUCATE 25。24 

PRINT "SNQKE" 』SLs 

上 二 4.3 すす すす 31 IMAIN LO ロロ F 
D*=INKEY* 

DN ASC(D$) 27 BOTD 9603950。930,94O 
BOT 970 

XV=0: YV=ー1 : CD=BR: GBDTD 970 

XV=0: YV=1 : C ロ =YL: G ロ TO 97O 

X ソ = ニー1 : YV=Oi CD=PP: BTD 97O 


水素 氷 氷 氷 氷 ボボ 


~X ソ =1 : Y ソ =O: C ロ =LB 


に に =( 一 KK+1 )* ネ (に に >O) 
X ロ = ニ XH ロ +XV 
YH=YH+YV 


1000 MC=MC+1 


IF MCSML THEN 1060 


1020 MC=O 

103O CDULOR 7 

1040 SBY=SY-1 

105O LUCATE さ 9。SYsPRINT "*※" ョ 
1060 IF SBY>O THEN 114O 

107O FG=1 

10 ヨ 0 TQ=Ta+1 

109O P=RP+1 

1100 LUCEATE 18。24:PRINT Ps 
1110 BUSUB 145O 


FUR 1=O TU 125:LUCATE 39。1IEPRINT " " 
sk NEXT 
SY=1 マ 3 


1140 PG= ニ BA+XH+LN*KYH 


15=PEEK (PS)〉 
IF (IS=BLK) DR( IS=SN) THEN BUTD 1670 


1170 POKE BAC+XH+YHKLN。C ロ 


PUKE PS。SN 


1190 SB(HP ) =FS 


HP=HP+1 


121O IF HP>1OOO THEN HP ニ =1 

1220 IF 1I=aPL THEN GUSUB 1 さ OOE BHT 90O 
1230 IF KRK>O THEN 00 

1240 CT=SB(TP) 

1250 TP=TP+1 

126O IF TP>1OO0O THEN TP=1 

1270 POKE CT』O 

128O0 BOT0 0O 
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・ ネネ 本 
BEEP 
PDTNT=FDITNT+1 
LCRTE ら 6,24 
EDLOR 7 
PRINT PUINT*PRs 

FDR T=SY TU 12:LUCATE さ 9。』T:kPRINT" " 
NEXT 

SY=1 さ 

MC=O 

KK=KK+ に し 

HS=HGー1 

RP=QPー1 

L ロ CATE 1。24 

PRINT Pi 

IF AP=O THEN 1540O 

IF HS>O THEN RETURN 

REPEAT 

RNX=RND ( 1 ) * さ ア +1 

RNY=RND ( 1 ) *22+1 

UNTIL PEEK (BA+RNY*LN+RNX ) =O 

LCATE RNX。RNY 

COLDR2 

PRINT "W's 

HS=HS+1 

RETURN 

COLDR7 

MUSTC"EODCEDCEDCEEE" 

IF FG<>O THEN 1600 

PDINT=FDINT+Ta 

LCATE 15, さ 3 

PRINT "BUNUS"』 TA*PRi 

FB=O 

SL=SL+ 1 

MEN=MEN+1 

LDCATE 15。5:PRITNT"SCURE" sFDTNT*PRs 
FOR エ =1 TO さ OOOs NEXT 

GBDT ロ 26O0 

ボネ ネネ ネネ ※ ネ BNQKE カカ " ジョ ウト リ  ※ ホ 玉水 米 ※※※ 
SL=SL-1 

IF SL=O THEN 172O 

MUSIC "-C5"*DN MEN BDTD 17BO。1790。 
18O0。1 昌 10。 182O。 1 ヨコ さ O。 1840。 185O。 1 ロ 6O 
MEN=1 

BT 178O 

MUSIC "CODCDEDCDEDEFBAB" 

COLOR フ ア 

LUCATE 1 さ 。21 

PRINT "TRY ABAIN ?"』 

IF INKEY ま (1) く >"N" THEN 100 

END 

RESTDRE 187O:GDTD 26O 

REST ロ RE 1 ヨ O:GBOTO 2e6Oo 

RESTDRE 1 ロウ OsBDTD 26O 

REST ロ RE 1900: GT 2eO 

RESTORE 1910:BDTD 26O0 

RESTORE 1920*:GHTO 260 

RESTURE 193O:BOTO 260 

REST ロ RE 1940:B ロ Tn 26O 

RESTDRE 1950:BDTD 260 

DaTA 0。O 

DATA 10。12。20。O。O 

DATA 10。11。21 。O。20。 弓 。 1 さ 。O 

DATQ 9。5。20。9。 1 1 。20。9。17。20。0。9。5。 1 
2。O 

DATA O,5。5。 15。 10。5。 15。 15。5。 15。 20。5。 
1 255 1 30 らら さき よき:O 

DaTA 5。3, 14。, 呈 。 14。 呈 。7。 14 9。 14。5。 
1 1 。 14。5。 1 さ 。 14。5。 155。 14。 昌 17。 14。。 19。 
14。5。21。14 

DATA 20。 さ 。 14。20。 弓 。 14。20。7。 14。20。9。 1 
4。 20。 1 1 。 14。20』 1 さ 。 14。20。 15。 14。20。 17。 
14。20。 19。 14。20。21 。14。0。O 

DAQTQ 9。 ら 6。20。9。 1 日 。 10。 20。 1 日 。9。0。9。 6。 ら 
ュ ワ 。 1 さ 。 呈 。 つ 。 ら 。 ら 。 29。 1 さ 。 ら 6。 19。 1 1 。 さ 。O 
DATA 0O。1 つ 。1。 フ 。 12。 1 1 。 12 つ 。 つ 。 1 。 1 1 。 つき 。 1 
5。 昌 。O 


EAT RaPPLE 玉 玉 水 水玉 玉 涼 ボ 


ザフト バン クノ / 


S ら 0FT『 
ミ テ トー 


@ 機 種 / ジ ャ ン ル 別 ソ フト ウェ アリ スト 
パソ コン ソフ ト 8,500 本 満載 上 
特集 プ ワ ー プ ロ ソ フト を 試用 する 
特別 企画 ノビ ジネス パソ コン 活用 マニ ュ ア ル 
機能 比較 ノビ ジネス ソフ ト 
簡易 言語 / ノ ワー ブロン 財務 会 計 ン 顧客 管理 ノ 仕 入 ・ 在 庫 ・ 販 館 
< ケー ス ・ ス タテ ディ >0A ソフ ト 活 用 事例 


人 amn ]0 月 初旬 発行 


MZ-700 (Hu-BAslo) 


は じ め に 


28 才 に な っ て パソ コン を 始め , 5 カ月 が 
た ち ま し た 。 中 途 半端 な 年 齢 で 始め た た め 
ゲー ム を や る に も , 子供 た ち が 熱 中 する よ 
うな せわ し い ゲ ー ム は , と て も や る 気 が 起 
きき なし 。 が と いっ て アド ベン チャ ー ゲ ー 
ム や シミ ュ レ ーション ゲー ム を や る ほど は 
暇 が あり ませ ん 。 そこで, と いう わけ て 
中 途 半端 向き ゲー ム ( ? ) を 考え て み ま し た 。 


ゲー ム 説 明 


駆逐 艦 「 秋 風 」 を 操作 し , 敵 潜水 艦 を 探 
索 し て 攻撃 する ゲー ム で す 。 

尋 第 1 ステ ー ジ 

デモ に 続い て 第 1 ステ ー ジ が 始ま り ま 
す 。 こ こ で は , 作戦 海域 図 も 見 な が ら 「 秋 
風 」 を 移動 きせ , 敵 潜 水 艦 を 見 つけ て くだ 
る い 。 

「 秋 風 」 の 移動 は カー ソル キー で 行ない ま 
す 。 カ ー ソ ル ひ と つ を 10 カ イリ と し て 計算 
し て いま す 。 島 や 壁 に ぶつ か る と 座礁 し , 
また , 燃料 が つき る と 沈没 し て ゲー ム オ ォ オー 
バー と な り ま す 。 燃料 は 500 トン (5000 カ 
イリ 分 ) 積ん で いま す 。 

以上 に 注意 もし な が ら 探 索 す る わけ で す 
が 、 半径 40 カ イリ 内 に 敵 潜 水 艦 が いる と, 
レー ダー が 反応 し ます 。 そし て 10 カ イリ 内 
に 発見 する と, 第 2 ステー ジ へ と 移り ます 。 
凛 第 2 ステ ー ジ 

海域 図 か ら , 海上 に 浮か ぶ 「 秋 風 」 の 画 
面 に 変わ り ま す 。 こ こ で は , ソナ ー の 反射 
音 で 敵 潜 艦 の 深度 を 判断 し , 爆 軍 を 投下 し 
ます 。 

、 第 2 ステ ー ジ で は クラ ス が 選べ ます 。 


A ク ラス ー 一 井 雷 深度 の 誤差 0 m。 
B ク ラス ーー 上下 1 m の 誤差 まで O K。 


C ク ラス メー 一 上 下 2 m の 誤差 まで OK。 
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秋風 


上 達 に 合わ せ て クラ ス を 選ん で くだ さい 。 
深度 は 8 mー20m まで で す 。 爆雷 は 20 発 
あり ます が , 3 回 続け て ミス する と , 敵 潜 
水 鑑 が 魚 軍 を 攻撃 し て きま す 。 運 が 良けれ 
ば 魚 軍 が は ずれ る こと も ある の で す が , 当 
た る と , 浸水 し た り , レー ダー が 壊れ た り ., 
燃料 が 流出 し た り で , た い へ ん な 騒ぎ に な 
り ま す 。 3 回 魚 軍 が 当たる と 「 秋 風 」 は …。 
支 判定 

最後 に 出発 点 で ある 基地 まで 帰港 し て 
判定 や 受け ます 。 

敵 潜 水 艦 を 10 モ キ 沈め ゆる と 名 艦長 で す 。 
A ク ラス と も な る と , 索敵 作戦 ソナ ー の 
反射 音 判断 な ど ,. ひと つの ミス も 許さ れ ま 


ぜん 。 
アプ ログ プラ ム に つい て 


イン プッ ト す る 数 字 や カー ソル 以外 は , 
S キー て で 統一 し て あり ます 。 

あっ ち を くっ つけ , こっ ちゃ を 引っ ぱ が し 
で 作っ た の で , 無駄 な 命令 な ど あ る か と 思 
いま す 。 適当 に 変え て 作っ て みる の も よい 
で し あう ョ 

最初 の デモ が 冗長 びと 思わ れ た 方 は , 

RUN320 [CRI 
で , 右 か 左 か 下 か に 「 秋 風 」 を ぶつ け て , 
ゲー ム オ ー バ ー の 状態 か ら 始 め て くだ さい 。 

主 な が フロー チャ ー ト を つけ て お きま す 。 


率 S-BASIC お よび SP-5030 へ の 移植 
S-BASIC の み の 場 合 は 回 、SP-5030 の 
み の 場 合 は |S P| と し ます 。 


1)REM 文 

団 REM の 省略 型 「*」 を 使っ た 場合 , 
それ 以下 の カタ カナ や グラ フィ ッ ク 
文字 が 使え なくなり ます 。 
「・」 の 後に 「 "」 を 付け 加え て 〈 
だ きい 。 


石野 正彦 


[S P]REM 廊 の 省略 型 は 使え ませ ん 。 
「)」 は REM に 変え て くだ きい 。 
2) COLOR 廊 
COLOR の 後 , 
て くだ きい 。 
例 COLOR 7, 0 つ COLOR.,7.0 
[SEP] COLOR 文 は すべ て 削除 。 
3)6GLS 区 
[sl[s Ep| CLS は PRINT“ 由 "に 変更 。 
4) LOCATE 文 
[|S][S P| CURSOR に 変更 。 
5)MUSIC 廊 
MUSIC 廊 の 中 で 「 十 」 お よび 
「 一 」 が 使わ れ て いる 場合 は 、 それ を 「 一 」, 
E _」 に 変更 。 
6) INKEY$ 文 
[s][S P]GET 文 に 変え て くだ きい 。 
例 K$= ニ INKEY$ - GETK$ 
7) IF 一 THEN ELSE 文 
[Ss PIEL SE は 使え ませ ん 。ELS 
E を 削除 し て , それ ぞ れ に 応じ 
た 変更 を 行ない ます 。 
例 250 K$= ニ INKEY$:IF K$=“S" 
THEN260 ELSE250 
! 
250 GET K$:IF K$ー"S"THEN260 
255 GOTO250 
8)CHARACTER$ 娘 
[s][s PICHARACTER 文 は 使え ませ ん 。 
以下 の よう に 変更 し ます 。 
例 410 IF CHARACTER $(RX,RY)= 
* 男 "一 


「・」 を 2 個 追 加 し 


|w 


lg 


! 
410 IF PEEK(53248 十 RX 十 RY*40) 
= | ディ スプ "レイ ユ コード | 一 
9) BEEP 廊 
[S][S P]BEEP の み の 場 合 は USR(62) 
また は MUSIC“_A" に 変え ます 。 
BEEP 1 の か わり に USR(68), 


BEEP0 の か わり に USR(71) 
が 使え る 場合 が あり ます 。 
だ めし て みて くだ さい 。 
使え な い 場 合 は 削除 し て くだ き 
い 。 
10)PAUSE 廊 
[8][S PIPAUSE 娘 は MUSIC 文 また は F 
OR-NEXT 文 で 代用 し ます 。 
例 4310 一 PAUSE50 一 
! 
[S]4310-FORI =1TO7000 :NEXT 
11)PRING USING 廊 
USING は 使え ませ ん の で , それ ぞ 
れ に 応じ て 変更 が 必要 で す 。 
例 440 一 PRINT"* ネ ン リ ョ ウ ":USING 
時 天天 "BN 5 
! 
440 一 PRINT"* ネ ン リ ョ ウ ”: :IF EN 
>=0 THEN PRINT* 円 " : 
445 PRINT SPC(3 一 LEN(STR $(E 
N))) EN 一 


以上 の コマ ンド に 注意 し な が ら , 1 行 1 
行 を 確認 し, も れ の な いよ う 確 実に 移植 し 
て いっ て くだ さい 。 

本 プロ グラ ム に 限ら ず , 他 , Hu-BASIC 
の プロ グラ ム も 以上 の 要領 で 移植 どき ます 。 
参考 に し て 《 だ きい 。 


ボボ ポポ ヤキ カド E" 水玉 素 


1 9 日 年 4 月 29 日 己 月 1 日 


BY B ロ ロー-YAN 


お DU お ぉ 中 け ビ 


ジス ^ー メ ダグ セコ スイカ:) ペ 
ウケ グ や" ョ ライ スウ 


ノン タリ サー AA つつ ケ f 
XY パーー ニ エア カセ "ツー イチ 
RX』 RY ヤーーーー セ コス イカ フー プー ゴ イキ 
リス レタ NT 2 ライ ー ズ 
リョ ヤー グール フライ タウ 
リフ ライ ジコ トノ ルー フタ 
Xs ダニーーー セ SrX7 カ ラン イト ^ ウ 
1 タン ド “ 
セ フ ズ イカ ニー フト“ 
ーー まう イー フー イト “の ウ 
お mw ウー ャ ーー ブシ” ョ つ リウ セ フ ペ メイ カン / イチ 
ーー ジコ ズ イ 用 イズ ウ 
し ーーーー 凡 ツライ コウ コウ ウイ ラス (AB。 じ ) 


* 
= 
* 
日 
ロ 
* 
日 
* 
= 
* 
に 
日 
= 
日 
ロ 
日 
= 
= 


電光 メイ ジ デモ 
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本 た た あま よ 人 人 よ よ よ よ 人 よ よ よ よ よ よ よ た よ よ よ よ ま よ よ よ 」】 


CULUR ア 。O CLS* GUHSUB さ 5 ヨ 0 

ユウ コウ 

BSUB460O 

CHLHR7 ょ OFPRTNT " 屋 ": BUSUB2O6O TEMP ロ 4 

L ロ CATE4。18: CHLUR ア OO 

PRTINT "レイフ" ヨリ ム テ " つ !! 

FUR 1=1TH5k LHCERTESO。 Bi EDLURS』OIFRTNT" 二 "5 MUSTC "BS" 
LCATE20。8: CHLOR6』 OkFRINT "5MUSIC"R2" 

NEXT 1 

FR 1=1TO 3 

LUCATE2。2OEPRTINTLEFT ま ("アキ カセ ^  N セコ ズ イカ ラ タコ サフ 、 コ ウケ テキ セヨ ! ( 己 ) キ -"。1) 
MUSIC"+DO" 

LCATE20。B: CDLURS。OEPRINT" 二 "MUSIC"R1" 

LCQATE2O。 日 : CHLHR6,O: PRTINT" 十 "MUSIC"R1" 

NEXT 1 

K ま = ニ INKEY ま : IF に ="5" THEN 26O ELSE 25O 

FUR 1=1TH15S:LHCATE17。12: CHLHR6 ょ 0IPRTINT"。" 
LUDCATE10。2 さ =PRTNTLEFT 邊 ("リョ カカ イー ココ リコ ウー スルリ 。 1) 
MUSIC"R さ " 

LCERTE17。 12: CHLHR2 OsPRINT" 。" 

MUSIC"R さ "ENEXT 1 

TEMFPH さ : NUS1C ビ "リー ビブ R コ ー ビ ア 7 " 

パグ サワ 

CULUR7』OI EN=5OOI SE=OI GT=OI ド =2OIL=4:M=O 
PX=22:PY=1 ヨ 

FRINT" 層 ": BUSUB740 

CULOUR ア 。 1 

FUHR 1=OT ロ 3: LUCRTE PX。PYEPRINT"@": EEEP 
LUCATEPX』。PYEPRINT"。 "RMUGSTC"RO" 

NEXT 1 

RX=INT (RND( 1 ) * つ 5+ 1 ) : RY=INT(RND( 1 ) *18+2) 

IF CHARACTER も (RX。RY)=" 較 "THEN 400 

IF CHRRRCTER ま (RXRY ) =" 衝 "THEN 400 

IF CHaRRCTER ま (RX。RY) ="a"THEN 40O0 
LUCATE2B』16: PRINT "ネコ リョ ウー "3 USTNG " 提 韻 揚 "sENIi PRINT" 征 本 " 
LCATE2 コ 14sPRINT "レー タラ ドー "8LK108 "EE 問 " 

LUCATE2B。18: PRTINT " セ つ っ カ 1 才 っ 、 

LUCATE2 ヨ 20 PRINT "NT 2 ライ "saUSTING" 揚 手 "sKISPRTNT" コリ" 
IF EN=25O _ THEN BUSUB105O_ ELSE 490 

IF EN=5O THEN GBSUB1O ヨ 8O ELSE OO 

IF EN=O_ THEN BTHD 1110 ELSE. 510 

P ま =INKEY も 

IF P ま =" 面 "THEN PY=PY-1 

IF P ま =" 本 "THEN PY=PY+1 

IF P ま =" 居 "THEN PX= ニ PX+1 

TF P ま =" 居 "THEN PX=PX-1 

IF PP 中 ="" THEN 1O 

IF CHARACTER ま も (PX 。PY ) =" 較 "THEN 690 

IF CHRRACTER 和 も (PX 』PY) =" 間 "THEN 6590 

IF CHARACTER$(PX。PY) ="Mk"THEN 690 

FUR エ =OTU2O: LUDCATE PX』PYIPRINT"@ り 
LUCATEPX』PYkPRINT"." 

NEXT 1 

EN=EN-1 

IF (PX=22) QRND(FY=18) THEN 115O ELSE 65O 

IF (RX く PX+L ) AND (RX>PXーL ) QND (RY く PY+L ) AND (RY>PY-L ) THEN 66O ELSE 680 
MUSIC"+BOR-ーBR+BR-BR " s BHSUB 1 1 さ O 

IF (RX=PX) QND (RY=PY) THEN 1 さ 90 ELSE 440 
CULUR7』OI LUCRTE5。 22: PRTNT" "s CHLOR7』 1 BUT ロ 4 


> サ " ジョ ウ 

PRTINT" 屋 "=s MUSIC"CSR5C5R5" 

PR INT "攻守 守 庄 庄 誠 計 計 困 還 可 時計 ジョ つ シシ "5FHR 1 エ =O0 T ロ 1OO NEXT1 
PR TNT "8 時 寺 計 誠 ーー リョ 

GUT ロ 110 

> カイ ズ ^ 

CULOR7。 1 

FRTNT 「 還 還 還 昌 間 間 昌 間 間 間 ss 


PRINT" 較 へ 、 ヘール ペ ヘー ル へ ヘー へ ーー へ 加計 す 2 セ フカ イイ キ 落 " 
PRTNT" 還 ノー ペン ニー ペアー ペン ニー トン ヘン ん 坦 義 N 業 " 
PRINT" 置 、 ヘー ペー スペ へ へ の 馬 K※ ヽ E 義 " 
PRINT" 還 \ ン ペン ハン ペン ハン へ 加除 XX 革 " 
FRINT" 画 ノー ヘー へ へ へ へ 馬 MSN 療 " ょ 
PRINT" 還 ノー ペアー ペン アーヘン ーー ハン へ ツ 往 革 に ]】 義 " 
PRINT" 画 、 へ ヘー へ 、 ん へー へ の へ / の 馬 訂 7 も カセ トイ トウ 欠 " 
PRINT" 較 \ ノ ンー ペアー ペン ーー へ ヘ Z ハン 本隊 し 業 " 
し て @$ 義 " 
PRINT" 還 ノー ペン ニー ペン ニー ペン ジー ヘン ー ヘン うん 昼 除 義 " 
FRINT" 較 N く ー ペール ペ ヘー ヘー ペー へ の 還 維 NT 


PRENT" 男 ペン ペン ニー ペン ニー ペン ー ペ ンー ペン 。" 

PRINT" ベー ハー ペー ハー ペーパ ミ 面 
PRTENT" 司 プーペ ンー ペン ニート ンー ハン 。 ツン 個 " 

FRINT" 較 くし へ 、 へ 、 へ ペー へ / 画 際 し の 、 軒 " 
PRINT" 較 7 トン 7 7 看 ン / 一 " 
PRINT" 加 ヘー 
FRINT "加古 陣 呈 識 隊 
トト コト | 1 回 旨 間 所 3P35RZ 放 TB) 則 5 族 殺 NE 馬 | 
GBDSUB970: RETURN 
COLOR4・1:LDCRTE20,4: FRINT 「 較 還 R 和 " 
LUCATE4・12:PRTNT 「 還 較 5 及 5 電 陣 隊 h、8 反 素 5 靖 靖 間 「" 
LDCATE さ 。 5: PR TNT 「 BE 電 3" 

LOCATE10。16:FRTNT" 電 " 

LODCQTE1 さ 1B:PRTNT " 計 " 

LOCQATE7。 17:PRTNT "回 PKS 幸 語 " 

RETURN 

* メリ セー ミド 

LUCATE2 昌 16: CHLUR2 ょ Oi PRTNT "ネー コリ ョ ウ 要 二 迷 迷 迷 トリ フフ " つ !! 

FOR LT=O TO40: BEEP*NEXT 1 

LUCATE2B。 17:PRTNT" "sg RETURN 

LOCATE さ さ 。 1 6: CHLHR2, 0 FRTNT "アト ワ ス " カリ ミュ LOCRTE10。22: PRTNT " キ コ ウ セヨ !! キ コ ウ セヨ !!! 
FUR 1T=O T ロ 40:EEEP:NEXT I 

LOCATE3 さ 。 16: PRINT" "s RETURN 

CELSs LUCATE2。10:FRTNT "サコ ネー ュー ネコ リョ ウ カ "りり キマ ジグ 時 必 業 業 3 ホリ 11111P 
GT01 170 

CDLUR2 ょ 7: LHCATE。22: PRTNT "セコ ス イカ ニー ラー レーヴ" - テ "トラ エダ 1 1 カイ カイ セヨ 1 11 リ 
RETURN 

し 

COLDR7 ょ Oi CELS: BDSUB 2O6O 

TEMP ロ さ : MUSTC"ー ビ ア R2ー ビ フ " 

*END ヽ 

IF (B1=O〉 QRND (SF>=1O) RND (EN>O) THEN 12OO ELSE 121O 
LCATE5。 2 FRINT "アナ タリ ルー メイ 本 れつ キョウ そい 11 本 "5 GHT ロ 126O 

TF (BT= さ ) ロ R (SC=O) DR (EN=O) THEN 1220 ELSE 123O0 
LOCATE。2 つ : PRTNT "ナタ リート" ミド ナ 本 カン キョ ウ コ エキ "で マ 。 コ キョウ セヨ 1 本": BHT ロ 1260 
IF 81>=1 THEN 1240 ELSE 125O 

LHCATE、2k FRINT " キ " ョ ライ ヲ ウサ ナイ ヨウ ニ ! 11 本 "BHTU126O 
LOCRTE。2: PRTNT "モコ マコ シカ" NT リ で ジョウ 1 " 

LHCQATE』 つ 1:FRINT "セー コカ 還 還 隊 靖 計 ゆ 丈 区 玉 式 率 通 新 六 | 放 誠 計 還 Gi EPRTINT "ジョウ ヒ ネ つ リョ ウリ 5500 一 


LUCATE5。 2 うさ s PRINT "ノコ リー ノー リー フラ イリ" ミ に K 
LUCATE22 ょ 2 つ さ : FRTNT "ウケ キ ま " ョ ライ リョ ミロ 1 

IF 5 ビ >=HT THENHI=5 ビ 

LUCQATE2 つ 5 : FRITNT "イマ マエ ./ 雪 要 数 3 サ プ コ ウ ドー カリ " ュ H1 
LUDCATE15。 17:PRINT "REPLRY (Y/N)  " 

K ま =INKEY$ ま も: IF に E 生 ="Y" THEN 1 さ 10 ELSE 1 さ 60 

BEEP: LHCATE15。19: INPUT "リト" ノ フ ラズ (Bs) "5 ビ L ま 

IF CL ま =" 人 a" THEN C=QO 

IF CL ま も ="B" THEN ビ =1 

ITF CL ま ="C" THEN ビ =2 

BUT ロ 32O 

IFK 各 ="N" THEN 1 ミコ 7O ELSE 1 さ 30O0 

END 

* セコ ズ イ カ ー ノー イキ ミ RX= ニ INT(RND(1 ) *19) :RY ニ INT(RND(1) *19) 
LUCATE2。22 PRTNT "セス イカ フ リウ ケ フ 1 1 ケイ カイ 1 ケイ カイ 1 "skFHR 1=1T ロ 3: TEMP ロ さ 5 MUSTC"ー ビ さ +C さ " 


5 NEXTI 


1400 
1410 
1420 
14 さ 3O 
1440 
145O 
1460 
1470 
14BO 
1490 
150O 
1510 


COLDR7。0:PRINT" 屋 "BT=O 

GnSUB204O 

FDR エ =1TO5: TEMPD さ 

LUCATE2。20: PRINT "リハ" フラ イー ウシ p ャ ヤー シド ュー ン ヒ " チ ュ ウ の リ 
LDCATE さ 1 。 12: CULUR さ 。OsPRINT "WW" ENMUSTC"ーE マ " 
LUCATE さ 1 。 12: COLUR ア 7。OEFRINT" Ws MUSTC"R2" 
LOCATE2。 21:PRTNT" 

NEXTI 

"ツナ ー/ リ "の ライ 

COLOR7。 0 PRINT" 國 " 

BI=BI+1:TF BI=>4 THEN BDSUBS240 ELSE 151O 

TF M<=19 THEN 1520 ELSE 2020O 

BDSUB2O06O 

CDLDR ア 。 OLDCATE さ 。 20: PRTNT "セコ スイ カフ ヲ ソナ - テ ~ トラ エ テ コウ 7" キ セヨ 1!" 
PRTINT" 醒 リン ジャ オフ ニニ チュ ウイ !! (8) キ - 8 
Y*=TNKEY ま : TF Y$ ぁ ="S" THEN 1560 ELSE 1550:BEEP 
B0SUB2260: GOSUB250O: GOSUB272O 
PRINT" 屋 ": BSUB 206O 

COLOR7。oO 

LOCATEO。 18 

Y 和 =LEFT 和 (人 " ッ に ) 

PRINT" 。。 "2 ライ ズ つ "YK 

PRTNT: BEEP 

INPUT"。。 T2 ラ イ シフト" (ジッ ト ~ BN 醒 カ 5 20M 本 3**) "5D 
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。 PRINT" 


IF (D:2O) ロ R (DB) THEN 158O 


FRINT" 醒 ハフ ライ サヤ に 人 

Y ま =INKEY も : TF Y 和 も ="G" THEN 1670 ELSE 1660 
BEEF 

LHCATE さ 1 』12 ミ FRTNT" "メニ Os Y ニ OM ニ M+1 : ドニ ロー 
FR J=1T ロ 4 

メデ メオ 1 5 Y= ニ Yー2 


LUCATE さ O+X 』1 さ +Y si 
FR T=OTH2OOENEXT Ii 
LHCATE30+X』1 さ +YEPRINT" " 

NEXT J 

Y=0: X=O 

FUR =1T ロ 4 メニ X+1 5 Y=Y+ 
LHCATE34+X。 ロ +YE FRINT" 

FUR 1=OTUSOOI NEXTI 

LUCATE ミ 4+X』 呈 +YsFRINT" 

NEXT J 
LUEATE3。14:PRINT"V"E TEMFH3I USBTC"ーEOR5" 
LCATE3 ヨ 。145FRINT" " 

BUSUBS260 BHSUBS650: Y=O0: SGY=SH+10: SGX=OEY=1 
FR J=OT ロ D 

KY=KY+1 

LCRTE さ 6 ょ EYEPRTINT" 介 


FRTNT"W" 


FR 1=OTUSO NEXTI 

LHCEATE さ 6』KYEiPRINT" "ETEMP ロ SE MUSIC"EORO" 
NEXT J 

FOUR J=O TU 10 :SX=5SX+1 


LUCATE36』EKYEPRINT" 衝 " 
LUCATE15+SX』SYiFRINTSU ま s MUSTC"+CO" 
LUCATE36 ょ YsPRINT" " 


LUCRTE15+SX 。5YsPRINT" 
NEXT 
IF (SBY>= ニ に KYー ビ ) RND (SY< ニ に ド Y+ ビ ) THEN198BO ELSE 1970 


LOCATE36』EYsFRINT"X" = MUSTC"ーD コ ー ビ " 5 GHTH1480 
FUR 1=1 TH ミ 

LUCEATE さ 6』EYEPRTNT TE 訂 衝 

TEMFU7 ア MUSTC"ー ビ ロー 提 ビ ーDー 提 Dー ビ ー ド 一 提 ビー ロー 音 ロ 一 仙 一 拉 合 一 日" 
NEXT TL:5BC=SC+ 1 5 GUSUBS6BOI BUTH35O 

CHLUR フ ょ OFPRINT " 屋 " : GHSUB2O6O 
LUCATE5。 2Os PRTNT "DDYT フラ イカ "の キダ 19 
LUCATE ヨ ご 2 ミ PRTNT " キ コ ウ セヨ () キ -" 

に まま = ニ INKEY ま も = IF に 和 ま ="5S" THEN さ 50 ELSE 2O3O 
CULUR フ ょ 0i " 子 キ カセ" 

PRINT" Me 
FRINT" < 
PRINT" 8 
FRINT" 8 
FRINT" = 
PRINT" 上 
FRINT" 4 
FRINT" 

PRTINT" ) 
FRINT" 
PRINT" 
FRINT" 
FRINT" 
FRINT" 


FRTNT" 屋 " ま ス イメ コカ 
GOSUB 2280: GHSUB2 さ 40+ RETURN 
PRTNT" ヽ ノ 


PRINT"ーー 
PRINT" 

PRINT" - ーー ーー ニー ーー ーー " 
PRINT"ー_ 
PRTNT" 
FRINT" 9 
FRTNT" 
FRTNT" 6 
PRTNT" 
PRINT" * 
FRTNT" W 
PRINT" の こ " 


"EMIUBTC"+ 井 BEOR2 


"5: CHLHRS・O: FRTNT 「 坦 還 間 陣 隊 間 間 昌 ED 1 に ビ ロ LOR フ ェ OEFRTNT" 


5 RETURN 


2420 
2 人 4 さ O 
ご 44Q 
2450 
<460 
2470 
24BO 
2490 
250O 
の きよ 
252O 
2 っ 5 さ 0 
254O 
Cee19)】 
2560 
25709 
25BO 
る 590 
260O 
る ら 610 
26ZO 
ご 630 
640 
2650 
2660 
る 670 
268O 
2690 
2700 
2710 
2720 
27 さ 0 
ご 740 
2 フ 75O 
マフ 60 
ダフ アプ 0 
278O 
2790 
2BOQ 
2 コ 10 
2820 
2 ヨコ 3O 
2840 
2 ヨ 5QO 
2860 
2 ヨ 7O0 
288Q 
2 ヨ 90 
2900 
る 2910 
2O 
る 293 
2940 
2950 
2960 
2970 
2S98O 
2990 
3000 
さ 3010 
さ O2O 
さ O さ 0 ひ 
304O 
さ 3050 
3060 
さ Q070 
308BO 
さ O9O 
さき 10O 
さ 11O 
さ 120 
さ 1309 
さき 140 
さ 150 
さ 160 
さ 170 
さき 18O 
さる 19O 
32O0O 
さ 210 


明 人 NZ AS 
KHTML の EN 
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FRINT" 〆 ヽ 

COLOR2・OiFRINT"  @。 .@ "5EEHLOR7 ょ OFRTNT" 
CHLOR2。O:FRINT" 議 議 菩 。 "iCHLORZ』O:FRTNT" 
COLORS・OIFRTNT" て 還 本 EEDLOR7』0EFRTNT" 
RETURN 
ナニ 
FR T=1TO4 

EQL ロ R1 Oo 

LOCATE 9, さ :PRINT" ロリ 

LEATE B』4:PRINT"ー ー" 

LCATE 6。』5kPRINT"ーー ーー" 
LOCATE 4:6=PRINT い ゆー ニーー ニ ーー ーー" 
COLOR ら 0: UTC"R2" 

LCATE 9』3kFRINT" ロリ 

LnCATE 日,4:PRINT"  " 

LOCATE 6,5sPRINT" 
LUCATE 4・ ら PRTNT" の 
TEMPD5: MUSTC"+CORO+C2R7 リ 


FR 1=OTO1OO 
LHCATE さ O』 に YiFRINTSD$ 


SD*ー" 本 的 ユネ = 史 EX ネエ 式 拓 和 『、 で 区 ミヌ し で け ME 史 呈 " 


NEXT 1: RETURN 
* セコ スイ カフ シフト“ 
5 ロロ =INT(RND【( 1 ) ※12+1 ) 


DN SD BUSUB 2760。2BO0』2B40。2BBO』 2920。2 つ 960 ょ 000』 コ 040。 さ OBO』 さ 120 ょ さ 1 0。3200 


RETURN 

FDR 1=1TO1O 
MUSTC"+CORO" 
NEXT 1 
RETURN 

FUR 1=1TO1O 
MUSIC"+BORO" 
NEXT I 
RETURN 

FDR 1=1T ロ ウ 
MUSTC"+# 人 1RO" 
NEXT 1 
RETURN 

FUR 1=1TOg 
MUSTC"+Q1R1" 
NEXT 1 
RETURN 

FDR 1=1T ロ B 
MUSTC"+ 音 1R2" 
NEXT 1 
RETURN 

FUR 1!=1TOB 
NMUSIC"+GB2R2" 
NEXT I 
RETURN 

FDR 1=1T ロ 7 
MUSTC"+ 間 FR さ " 
NEXT I 
RETURN 

FDR 1=1T ロ Z 
MUSIC"+F3R ド R さ " 
NEXT I 
RETURN 

FDR 1=1TO6 
MUSIC"+E さ R さ " 
NEXT I 
RETURN 

FDR 1=1TD6 
MUSTC"+ 六 DSR さ " 
NEXT 1 
RETURN 

FDR 1=1T ロ 6 
MUSIC"+D さ SR さ " 
NEXT + 
RETURN 

FDR 1=1TQ6 
MUSIC"+E さ R4" 


REPLAY て リボ) 


リョ ミウ ヒ に ネン リョウ 2 
う 979 キ " ョ う ィ 珍 
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NEXT 1 

RETURN 

フジ” ョ ウ セ つ スイ カフ 

FRTINT" 屋 ": GHGUB 207O 

LDCATEO。 18: CHLDR7。 1 : PRTNT" 

FRINT" ー 
FRINT" aw 
FRINT" い 
PRTINT" 
PRINT" 3 
FX=INT (RND( 1 ) * ご ロ +2) 

Fn も = LU | | 畔 

日 も = ニキ 
LUCATEFX 。 22sPRINTF ま 5 MUSTC "7RO" 
LUCATEFX。2O: PRTINTFG ま * MUSTC"AZRO" 

BX=O BY=O 

FUR 1!=1 TO 4:BX=GX+1 3 BY=GYー1 

COLUR プ 7 1 

LOCATEFX+4+BX。 20+TBY:PRTNT"/ 昌 葉 " MUSTC"+G2" 
COLORO。 1 
LUCATEFX+4+GX 』 2 つ O+TBY: FRTNT " / 人 時 茜 ん " 5 MUSB1 じ リー ロ 2" 

NEXT 1 

IF FX>= ニ 2 くさ THEN さ 45O_ ELSE さ 51O 

LUCATE 2。22: CHLUR ア ェ OEPRINT" キョ ライ ハス "ルレ マ シタ! 19 
TEINPO 5: MUST エビ "ビビ O 韻 ビ D 井 DEF 韻 F は 韻 は 仙 井 谷 選 キビ + 提 ビ +D 韻 D+ ビ キビ + 韻 日 二井 選 谷井 生 +BR 呈 "| 
COLOR1 。 1: LUCATEF X 。20: PRINTFGS ま 

CULUR7 Oi LUERTEFX 。21:PRINTF ま : MUSIC"a7O" 

COLOR1。 1:LUCATEFX,21:PRTNT" "MUSIC"A70" 
COLUR7』 ょ Oi ELS: RETURN 

FR I= QO TU さ 

COULUR2 。 1 : TEMPD 7:MUS1 じ "ー ビ 〇 ー 柱 ビーD 一 揚 Dー ビ ーー 提 ー ロ ー 提 ロー 仙一 韻 和 ローBCR" 
LUCRTEF X+6+ ロ X 。 15: PRINT " 放 当 思 B 更 5 ": MUSIC"R5" 
LUCRTEFX+6+ ロ X 。15: PR TNT "年 委 各 に お お 5 モミ ミネ アア " 


NEXT r 

BUSUB4O5O 

FRETURN 

* セリ メイ 

FRINT" 層 " 

BSUB206O 

C ロ LOR7 ア OLUCATEO。O 

FRINT" と 敵 是 ES に 
FRINT" 還 回 較 回 | ” 四 | 
PRINT" | 四 肖 四 | 回 - 還 回 
FRINT" 5h、 目 四国 | 較 の 
PRINT" 池 古 や 、 ダム LIL_ 器 し 
PRINT" 和子 や | 四 jj に 


FRINT " 昌 1944 年 ソロ モー っ カイ イキ " 

LHCATE2 。20: FRINT "フキ フカ フン 了 キ カセ "ノー セリ メイ (Y/N) " : BEEFP 

に まま =INKEY も : TF に K 和 ま ="Y" THEN さ 72O ELSE さ 710 

IF ド K ま ="N" THEN RETURN ELSE さ 7OO 

LUCRTE2』203s PR TINT "アキ カセ "jn BOO カイ リ ヲ コウ コウ エ " キ マス "kPaUSE さ Os BEEP 
LCATE2。22:FRINT" (8) キ - 

ド K 和 ま =INKEY ま も : TF ="S" THEN 3750_ ELSE 3740 
LHCATE2。20: PRINT "アキ カセ ドル リフ ケイ 40 カ イリ ラ 8 
LUCATE5。 22: PRTNT "ウフ サフ ズル レー ヲ モ ゅ テイ マズ "iPAUSE 30 BEEP 
LCATE さ O。 225 PRINT" (G) キー" 

に K ま =INKEY ま : IF に まま ="5S" THEN さ 790 ELSE さ 78O 

FR 1 エ =OT ロ 3: LHCATE19。 9: TEMPO さ PRINT "ENMUSTC"R さ " 

LUDCRTE19。 9:PRINT") "iPRUSE 5 

LHCATE19。 95FRINT"W'iPRUSE 5 

LUCATE19。 9:PRINT") "FARUSE 5 

NEXT Ii 

"に ま = ニ INKEY も : TIF に K ま ="S" THEN さ 46O ELSE 3450 
LUCATE2 ょ 20: PRTINT "アキ カセ " ) 20NM 本 マテ "ノン リコ ジャ オフ ヲ キ フ " 

LUCATE5。 22:PRTNT "ソナ - ヲ モ ゅ テマ スズ "s PRUSE さ O =:BEEP 
LHCATE25』 22: PRINT"(G) キ -" 

に =INKEY ま : IF に ="5" THEN 3B9O ELSE 3BBO 
LUCATEO。 14: BHSUB2280 

FUR 1=O THU 10:LUCRTE9』16: CULUR2 OiPRINT" LE MUSIC"R さ " 
LCATE9。 16: CHLUR6 0:PRINT" LI"s MUSTC"R さ " 


NEXT 1 

LOUCRTE2』2OE PRINT" Mg 

LUCATE。 22:PRTNT" w 

CDLDR7。 Os LUCRTE2。2OI PRINT "アキ カセ リハ "フライ ラ 200" り モッ テイ マズ "EPRAUSE さ O 
LOUCATE 55,22sPRINT" (5S) キー- に * 


K ま =INKEY も : TF に も ="" THEN さ 980 ELSE さ 970 
FOR =1TD10s TEMPD さ 

LOCATE さ 1 。 12:PRINT" "= MUSTC"R さ " 

LDCATE さ 1 。 123 CDLDR7』O PRINT" "MUSTC"R さ " 


NEXTI 


LUEATES ょ SOEFRTINT" 。 セリ メイ ゴー す ロリ 1 "s FUSE10: EEEF 
LHCATE5。22kFRTNT" () キ - 上 

K 和 ま = ニ INKEY ま : IF ドド 和 ="G" THEN_ RETURN ELSE 4040 

Yo で 

1=5 エ +1 

ELUR7』OiFRINT" 届 "LUCRTEO。 1 GOSUB2O6O 


COLQR ア 。 1:LOCATEO。 14:PRINT"ーーーーーーーーーーーーーーーーーーーーーーー… 
PRINT"ーーー- ーー ーー ーーーーーーーーー ーー ーー テー ーーー" 

PRINT"ーー ーーー ーー ーーーー ーーーーーーーー"s COLOR7。O 

TEMF ロ 6 MUSIC"ーCOD7-COD7" 

LUCATE5。 20: FRINT "サウ トン ニ キョ ライ メイ チュ の! 1" 


LUCATE5。 225 PRTNT リコ ロフ スイ ジコ タイ! 1 《 ら >: 率 る | "BEEP す 


に まま =INKEY ま も: IF に ="G" THEN415O ELSE 4140 

DN S1 BOTD 4160。4270。 4 さ BO 

LUCATE。 223 PRINT "ロイス イセ ヨ 1 1 イズ ヌイ ポッ フフ 5111 1 (GS) キモ - 上 
ド K 各 INEEY 和 も = TF に まま ="S" THEN418O_ ELSE 417O 

BEEPO 

IF ENS5O _THEN42OO ELSE 4210 


LUCATE5。22: FRTNT "ネフ リョ ウー リュ ウジ ュ リ ウリ 111" sPAUSE 0:GUTH 4460 
FUR 1=OTH10iMUSIC"D2#DEF 拉 F "INEXT エ 


CHLOR7。0I PRINT" 層 "は GUSUB2O6O 

LUEATE5。 18: PRINT "イズ イカ コリ ョ ウ 1 1 オオ コキ ュ ウ ジュ ウリ カコ リョ ウロ ! "s BEEFP 
LHCATE5』 20 FRTINT" ヒ カ ^ イ ホウ コ フ - ニ 一 ーーーーーーーー" 
LUDCATE。 2 つ sPRTINT" ※ レー ワー コジ ョ ウ の 1 さ O カ イリ マキ" 1 "8 し ニス 
LUCATE5。2 つ 4: PRTINT" *※ ネコ リョ ウー リュ つの ョ コリ 5OT ! ! 本 騙 ( 紀 ) キー "EN=EN-50 BHTH444O 
LHCATE5。 2S5 PRINT "イミ イ セヨ 1 1 リロ イズ ライ ホコ フ 5 1111 (B) キ ー Me 

に ま =INKEY も : IF ド に も ="S" THEN4290 ELSE 4280 

BEEFO 

IF ENS1OO THEN4 さ 10 ELSE 432O 

LUCATE。22:PRINT "ネコ リョ ウー リュ 25 ュ コリ 11 1"sPAUSE 50IGHTH 4460 
FUR 1T=OTD10: MUSTC "DDEF 韻 F "ENEXT 1 


CHLOR7 ょ OFRTINT" 悦 " : GHSUB2O6O 

LUCATE 紀 。 18:PRINT "リリ イミ イカ ンコ リョ つ 1 1 オウ コキ ュ ウ コウ リ カコ リョ ウ ! "s BEEP 

LCATE』 2O0:FRTNT" に カ " パイ ホ 2 コ 2 一 ーーーーーーーー" 

LUCEATE5, 22EPRINT" ※ し レーヴ "ーー コミ ヨコ ウー 2O カ イリ マテ 11 HI ミー ジィ 

LUCATE5。24:FRINT" *※ ネリ リョ ウー リュ ウジ ュ リ 10OT! ! 本 騙 (本) キ - "EN=EN-100: GHTO44 
LUCATE5、22: PRTNT" リリ T ミ イ セヨ 1 1 ロイ ズ イ 調 や つ フ 1111 (8) キ - 4 

に K ま =INKEY$: TF に も ="G" THEN4400 ELSE 4390 

BEEPO 

FOUR エ =OTHU 5:LUCRTE5。22EPRINT" リロ イズ イ ホコ フ 5 Bb ヨ の フッ ノウ 1111 "MUSIC"BZ" 
LUCATE5。 22EFRTINT" "sk MUSIC"R さ " 

NEXT IiGBOUTOU 4460 


K ま =INKEY ま : ITF KK まま ="B" THEN445O_ ELSE 4440 
BEEP:PRINT" 層 "iRETURN 

すっ ホ " リ 

PRINT" 居 ": CULDR7』OI LUHERTEO』 1 : BHSUB2O60 


ELORZ フ 。 1 :LOCATEO。14sPRINT "ーーーーーー 連 ーーーーーーーーー デ ーー※※ む ヤ ピ ョ ョ ッ ウゥ ピッ ッ v バ ve 


PRINT" ーー ーー ーー ーーーーーーーー、 ーーーーーー ーー " 


PRINT "ーー ニー ar こら ーー 
TEMFDU6: MUSIC"+CEOD7+EOD7 プ " 
LOUCATE5。 225 PRINT "ジフ スイ ! 1 ジコ スイ ! 1 (GS) キ -" 


K 和 ま = ニ INKEY ま : TF に 和 ま ="5S" THEN455O _ ELSE 454O 


FUR =1T ロ ミ 

CULUR,2: LUCATE5。 22:PRINT" "s MUSIC"+D6" 
LHCATE。 22 5 PRTNT "リウ イフ ヲイ カコ 1 ソウ イフ ダイ カフ っ 11 "sgMUBTC"ーD6" 

NEXT 1 

FDR T=1T0D3s CDLUR6 ょ Oi LUCEATE1 さ 。B:sPRINT" S. ロ .S 士 SsDiS " 


TEIMP ら 6: MUSTC"+COR+CR+ ビ ド + ビ 2R+CR+ す CR+COR+CR+CR2 " 
LDCEaTE13。B: EDLUR7。 Ok PRTNT" 十 "MUSTC"+COR+CR+CR+C2R+CR+CR+COR+ ビ 


R+CR2" 


45B さ 
455 


NEXT 1 
TEMPO 7:IMUST ビ "+ じ O+B+ 昔 向谷 十 韻 ロ 坦 + 韻 + ド + ビ + 韻 +D+ 韻 ビビ 日 韻 合 内 韻 は 井 FE 韻 D1D 六 じ ビ ーー 韻 RR1AR1 


ー 提 は さ R1 一 GR 1 一 音 F ド フーF 4 ドコ ー ビ ド 2ー 提 DR ミーDR4 一 杜 じ GR ラー ビア R ロ ー ビ 7R コ ロー ビア R7R ア ビ 5" 


459O 
4600 
461O 
4620 
46 さ 0 
4640 


- 465O 


4669 
467O 
4675 
468O 
46 ヨ 5 
469O 
4695 


CLSLUCATE10』。10EPRINT " チ つ っ ホ "911"sBDTD1 18O 


* 


PRTNT" 屋 " 
LDPATE2。6* PRTNT" 人 フラ ス 。 セイ ミウ ナ 配 Y" フ ライ (ムズ "カシ イ チー ズ 。 本 ) " 
LOCATE2。 PRINT" B2 ラ < フウ ウノ 本 "フラ イ (ナレ ルト カン タンキー ズ 。 本 )" 
LDCATE2。10: PRTNT" フラ ス キョ ウリ ョ フナ 配 V" フラ イ (カッ ウフ テ "スズ 。 本 ) " 


LOCATE5。 さ : PRINT "2 ライ ノ ジュ ルイ ヲ キメ テ フラ" サイ 。 本 " 
LDCATE5、 14: PRTNT "サイ ショ リ \ 本 C フ ラス カラ NE メグ ホウ カトー イイ チ " ジョ ウ 。 問 " 
LCATE10。20: INFUT" ト " / 本 7 ラス (人 。B。C) "し も 

TF PL*="A"THEN 4675 ELSE 468o 

=O: RETURN 

IF CL ま ="B"THEN 4685 ELSE 469O 

ビ =1 : RETURN 

TF EL*="C"THEN 4695 ELSE 466O 

C=2: RETURN 
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秋風 の 


今 か ら マ シン 語 を 始め て みよ うと いう あな た / 


も っ と マイ コン を 徹底 的 に 使い こなし て みた いと 思っ て 


BASIC に 飽き た あな た / へ 送る 便利 な ソフ ト 。 


逆 ス クロ ー ル する 
ラベ ル 付 
逆 ア セン プラ ー 


好評 発売 中 


多 機能 な 機械 語 
貴人 タ 一 


好評 発売 中 


機械 語 動作 テス ト ツ ー ル 
〆80 7OCA7A 万 7 内 AAC 丘 末 


リロ ケー タブ フル トレ ー サ ー 
BASIC に 比べ る と 、 機 械 語 プ ログ ラム は 、 そ れ 自 身 で は 

エラ ー チ ェ ッ ク 機 能 が な いた め 、 バ グ を 発見 する の が 大 変 で 
す 。 そこ で 、 効 率 的 に 機械 語 プ ログ ラム の 開発 が で きる よう 
に 、 双 初心 者 は Z80 機 械 語 の 動作 を 理解 で きる よう に 、 使 
いや すさ を 徹底 的 に 追求 し た Z80 リロ ケー タブ ルト レー サー 
で す 。 ブレ ー ク ボイン タタ 方 式 の デバ ッ ガ 機能 1 命令 ず つ シ ミ 
ュ レ ー ト する トレ ー ス 機能 の 2 つの 機能 を 持ち 自分 自身 の リ 
ロケ ー ト 機能 を 利用 し て 、 あ ら ゆ る アド レス (モニ ター 部 、 R 
0M 部 は 除く ) で の トレ ー ス を 可能 に し て いま す 。 


機械 語 解 析 ツ ー ル 
SC 万 O74 の り /$ ぐ -ASS/7 太 ん / 戸 
スク ロー ル ディ ス アセ ンプ ラー 
スク ロー ルディ ス ア セン ブラ ー は 、 巻 物 の よう に 上 下 に 自 
由 に スク ロー ル す る ラベ ル 付 Z80 逆 アセ ン ブ ラ で す 。 
機械 語 は 、 普 通 の ダン ププ ログ ラム で は 16 進 数 の 表示 し 
か で き な い の で 、 入 力 し た 機械 語 の 確認 や 、 他 の 機械 語 プ 


ログ ラム の 内 容 解析 が 大 変 で す 。 そ こ で 、 こ の ソフ トウ ェ ア 


を 使用 する と 、16 進 数 の 機械 語 を 分 が ) や すい ニー モニ ッ ク 
形式 で 、 又 ラベ ル 付 き で 表示 し て くれ ます 。 ま た 、 こ の ブロ グ 


6 
ラム は 機械 語 で 作成 され て いる の で 、 高 速 に 解析 で き 、1 つ 


の キー 操作 で 簡単 に 送 ス クロ ー ル も で きま す . 


機械 語 入 力 ツ ー ル 

SE ELOCA7ABLE が OM/7O 太 
セル フ リロ ケー タブ ル モニ ター 

あな た は 、 マ イコ ン 雑 誌 か ら 機械 語 プ ログ ラム を 打ち 込む 
時 、 入力 方 法 が 分 か ら な か っ た り 、 入力 ミス を し た り 、 モ ニタ ー 
プロ グラ ム を 使い に くく 思っ た こと は あり ませ ん か ? 

セル フ リロ ケー タブ ル モ ニ ター は 各 マ イコ ン 雑 誌 か ら 、 機 
械 語 プ ログ ラム を 打ち 込む た め の 使い や すさ を 徹底 的 に 追 
求 し た 機械 語 モ ニタ ーブログ ラム で す 。 
1) この プロ グラ ム は 、 リ ロケ ー ト 機能 が 付い て いる の で 自由 な アド レス に 配置 で き 

任意 な アド レス へ の 機械 語 の 入力 、LOAD、SAVE が で きま す 

2) 機械 語 を 打ち 込む 時 、1 行 ずつ チェ ッ ク サ ム を 確認 し な が ら 入 力 が で きま す 


機械 語 テ ー プ 編集 ツー ル 
ASSE77 SAPV 丘 太 
カセ ッ ト セイ バー 
機械 語 を テー プ に SAVE し て いる 時 、 ファ イル ネー ム 、 ア 
ドレ ス な ど が 分 か ら な く な っ た こと は あり ませ ん か ? 
カセ ッ ト セ イ バ ー は 、 カセ ッ ト テ ー プ に 記録 され て いる 機械 
の バッ クア ッ プ を 簡単 に 作成 し た り 、 カ セッ ト テ ー ブ の 情報 
(ファ イル ネー ム 、 各 アド レス な ど ) を 調べ た り 、 別 の テー プ 
に 編集 し な お し た り で きる ソフ トウ エア で す 。 
※ 編 集 機能 に つい て ……: 本 体 の RAM を フロ ッ ピ ー デ ィ ス ク の よう に 使用 し て 、 機 械 
語 、BASIC 、 デ ー タ な ど を 空い て いる RAM エ リア に 次 々 に LO0AD し て 、 そ れ ら の フ 


ァイル ネー ム を 変更 し た り 、 順 位 を 入れ 換え だ り 、 各 アド レス を 変更 し た り し て 、 まとめ 
て ある い は 部 分 的 に ある い は 何 回 も テー プ に SAVE す る こと が で きま す 。 


1) この プロ グラ ム は 、 リ ロケ ー ト 機能 が 付い て いる の で 自由 な アド レス に 配置 
で き 、 任 意 な アド レス で 機械 語 の トレ ー ス が 可能 で す 。 

2) Z80 シ ミュ レー タ を 内 蔵 し て いま す の で 、] 命 令 ず つ ト レー ス す る こと が で きま す 」 

3) ブレ ー ク ポイ ンタ は 32 個 まで 、 ル ー プ カウ ンタ は それ ぞ れ の アド レス に 対し て 、 
最大 255 回 まで セッ ト す る こと が で きま す 。 

④ スク リー ン エ ティ ッ ト 和 能 を フル に 使っ て いま す の で 、 各 レジ スタ の 修正 、 
フラ グ ( ビ ッ ト 単 位 ) の 修正 が 簡単 に で きま す 。 

5) プリ ンタ 出力 機能 が 付い て いま す の で 、 ト レー ス し た 結果 な ど を プリ ンタ ー に 
打ち 出す こと が で きま す 

6 逆 ア セン プル 機能 が 付い て いま す . 

7) リロ ケー タプ ログ ラム が 付い て いる の で 、 各 種 機械 話 を 自由 な アド レス に 
リロ ケー ト す る こと が で きま す 

8) メモ リー ライ ト 、 メモ リー ダン プ 、 ブロ ッ ク 転 送 機能 も 付い て いま す 


①D 上 下 に 自由 に スク ー ル する の で 、 機 械 語 の 解析 が 楽に で きま 
す 。 

スク ロー ルス ピー ド を 10 段 階 に 調整 する こと が で きま す 。 

ラベ ル 付 で す の で 、 リス ト を 見 や すく 出力 する こと が で きま す 。 

リロ ケー ト 機 能 が 付い て いる の で 、 自 分 自身 を 自由 な アド レス 

に 配置 する こと が で きま す 。 

オフ セッ ト 機 能 が 付い て いる の で 、 他 機種 (CPU は Z80) の 

どこ の アド レス の プロ グラ ム で も 、 正 常に 逆 アセ ン ブ カレ する こ 

と が で きま す 。 

プリ ンタ ー 出 力 機能 、 アスキー コード 出力 機能 付 。 

デー タ エ リ ア を 調べ て 設定 する こと に よっ て 、 その エリ ア は デ 

ー タ と し て 逆 アセ ンプ ルリ スト を 出す こと が で きま す 。 


3 6ー7 種 類 の チェ ッ ク サ ム (8 パイ ト ご と 、16 バ イト ご と 、 た て よこ (1,2 の 機種 を 除 
く ) 、128 バ イト ご と 、256 バ イト ご と ) を 出す こ と が で きま す 。 
キー ボー ド の 一 部 分 を 16 進 キー 配置 に 変え て 、 機 械 語 の 入力 が 素 速 く で き 
ます 
5S) スク リー ン エ ディ タ を 多く の コマ ンド で 使っ て いる の で 、 修 正 が 簡単 に で きま す 。 
6) プリ ンタ ー 出 力 機 能 が 付い て いま す 。 
7) 16 進 、10 進 、2 進 の 混合 加減 算 機 能 が 付い て いる の で 、 ア ドレ ス 計 算 な ど が 
で きま す 。 
サー チ 機 能 で 機械 語 の 検索 が で きま す 。 
9) リロ ケー タプ ログ ラム が 付い て いる の で 、 各種 機械 庄 を 自由 な アド レス に リロ 
ケー ト す る こと が で きま す 。 
9 テー プ に セー ブ さ れ て いる 機械 語 の 各 ア ドレ ス を 調べ る 機能 も 付い て いま す 
約 24 種 の コマ ンド を も っ た 多 機 能 機械 話 モ ニタ ー で す 。 
区 PC-8001 用 は 、 機 械 店 を テー プ に SAVE す る 時 、 ファ イル ネー ム 、 スタ ー ト アド 
ス も 記録 で きる よう に な っ て いて 、SAVE さ れ た 、 テ ー プ は R0M モ ニタ ー の し コマ 
ンド で も 、PC-8801 モ ニタ ROM の "R2: 避 ETURNI" コマ ンド (600 ボ ー) で も L0 | 
AD で きま す 。 


BASIC プロ グラ ム は 、 リス ト を 表示 し た り 、 修 正 し た り 、LOAD、 
SAVE が 簡単 に で きま す が 、 機 械 語 は アド レス が 関係 し て いる た 
め 、 分 か ら な く な る と 、 修 正 し た り 、SAVE し た り で きま せん 。 そ こ で 、 
この ソフ トウ エア を 使用 する と 、 簡 単に 機械 語 の ファ イル ネー ム 、 
トッ プア ドレ ス 、 エ ンド アド レス 、 エ ント リー アド レス 、 ファ イル モー ド 
な ど を 調べ た り 、L0AD、SAVE し た りす る こと が で きま す 。 また 、 
ロー ドア ドレ ス を 変更 する こと も で きま す 。 


ファ イル ネー ム 、 トッ プア ドレ ス 、 エ ント リー アド レス 、 ファ イル モー ド の 変更 。 ファ 
| イル 順位 の 入れ 換え 。 フ ァイル の さく 除 。 ファ イル 一 覧 表 の 出力 。 ファ イル の L | 
0AD、SAVE。 他 。 ブリ ンタ ー 出 力 機能 付 。 


オー ル マ シ ン 語 
ジ ナ ル ソ フ ト 


コー ザー の た め の 便利 な 機 寝 語 ユー ティ リティ ー 


②MZ-1200.80K/C 用 
③MZ-2200.2000.80B 用 | 
④ パ ソコ ン テ レ ビ X1 用 | 


⑤PC-8001, 8001mk エ 。 
8801(N-BASIC モ ー ド ) 


⑥PC-8801 用 


テー プ 
各 \4.000 無料 


(マニ ュ ア ル 付 ) 


①MZ-700 用 


②MZ-1200.80K/C 用 
③MZ-2200.2000.80B 用 | 
④ パ ソコ ン テ レ ビ X1 用 


'⑤P-8001.8001mK 
8801(N-BASIC モー ド ) 用 


〒 無 料 
(マニ ュ ア ル 付 ) 


①MZ-700 用 
②MZ-1200.80K/C 用 


③MZ-2200.2000.80B 用 
(④ パ ソコ ン テ レ ビ X1 用 
⑤PC-8001.8001mKI 
8801 (N-BASIC モ ー ド ) 用 
テー プ 


各 \5.000 


(マニ ュ ア ル 付 ) 


| ①MZ-700 用 | 
| ②MZ-1200.80K/C 用 
| ③MZ-2200.2000.80B 用 | 
| ④ パ ソコ ン テ レビ X[ 用 | 


〒 無 料 


テー ブ 
各 \3.500 


(マニ ュ ア ル 付 ) 


〒 無 料 


当社 の 便利 な 機械 語 ユ ー テ ィ リ ティ ソフ トウ エア は 、 次 の 3 つの 特徴 を 持っ て いま す , 


1. 特 殊 な モニ ター は 使わ ず 、 標 準 装備 の モニ ター 部 を 利用 し て いる の で 、 使 いや すく な っ て いま す 。 
2. 処 理 し た い 機 械 語 と アド レス が 重なっ て いて も よい よう に 、 リ ロケ ー ト 機能 を 付け て 自分 自身 の アド レス を 自由 に 
変更 で きる よう に な っ て いま す 。( カ セッ ト ・ セ イ バ ー は アド レス と は 無関係 で す の で 、 あ えて 付け て いま せん 。) 


3. 約 4 一 6 KB の 機械 語 で 作成 され て いる の で 、 処 理 が 高速 で 、 フ リー エリ ア を 多く 確保 する こと が で きま す 。 


マイ フロ ラブ 


御 注文 は プロ グラ ム 名 と 機種 名 と 電話 番号 を 明記 
は 郵便 振替 で お 申し 込み 下さ い 
〒850 長崎 市 五島 町 7 一 17 高島 ビル 


の 上 、 現 金 書留 


谷 0958 -2/ - 


MZ-700 (オー ル マ シ ン 語 ) 


SPACE FIGHTER ⑱ 


今年 は マシ ン 語 に 挑戦 し よう 。 そう 決心 
し て , 居 は 眠っ て も 夜 眠ら ず , シュ シュ と 
組み あげ た オー ル マ シ ン 語 の ゲー ム で す 。 
自分 で は マシ ン 語 入門 の つも り で 作っ た の 
で す が , な に ぶん 初め て の こと な の で , ず 
いぶ ん ムダ な と ころ が 多い ブログ ラム だ と 
思い ます 。 ご 容赦 くだ さい 。 
、 初め は, S-BASIC の モニ タ を ツー ル に 
し て 作成 し た の で す が , バン ク 切 り 替 え の 
ポイ ント が つか め ず , 結局 . モニ タブ ログ 
ラム (MONITOR 1Z-009A) で 作り あげ 


まし だ 。 思う の で す が , MZ-700 は マシ ン 


*%※ HIMZ CHECEK SUM _ SYSTEM 


DR 。 
7000 
700 昌 
7010 


1 + ロ 
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0 
BO 
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語 入 門 と し て 最高 の 機械 で は な いで し ょ う 
か 。 モ ニタ が し っ か り し て いま すし , 非常 
に わか りや すい 機械 で す 。 


ノア クラ Ao 入 カ 


電源 を 入れ て スタ ー ト する モニ タブ ログ 
ラム (MONITOR 1Z-009A) を 利用 し ます 。 
マニ ュ ア ル の 200 ペー ジ 以 下 に 解説 きれ て 
いま す が , *M7000 と し て , リ スト どおり に 
メモ リ を 書き か えて くだ さい 。 少 し 長 〈 て 
申し 訳 あ り ま せん が , で きれ ば <《Oh/MZ 
統一 チェ ッ ク サ ム ) (6 月 号 発表 ) の プロ 


飯田 賢吾 


グラ ム を 用 意 し て , 8 バイ トチ ェ ッ ク を し 
な が ら 。 て いね い に 入 力 し て い だ だ け ま せ 
ん か 。 後半 は 次 回 に 掲載 し ます 。 


ノノ 兆 時 


画面 に メッ セー ジ が 出 ま すか ら , 指示 ど 
お り に 操作 し て くだ る い 。 100 点 を 越え る 
と 照準 器 が 出 ま す 。 

スピ ー ド も 早く な り ま す 。 読者 の 殖 き ん 
が 工夫 し て , 上 か ら も UFO が 出 て くる よ 
うに すれ ば , も っ と 面白 い (ゲー ム に な る , 
と 思い ます 。 
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5 は で の 


ーーーー エ ーー ニーーーーーーーーーーーーー ニ ーー ニーーーーーーーーーー 16DE フフ さ ヨ F OO OO OO さる E さ C 32 3 =1.F4 
フ 540 06 OZ7 11 14 OO C5 06 14 :1.11 。 。 。 | 。 ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 一 一 12F9 
フ 7548B 77 23 10 FC 19 1 1O F5 : さ .85 フフ 740 DO さ 2 74 DO 3E 70 21 aB : さ 。CO 
7550 OO 00 00 CD Be 1 さ E さ C 2.7E フ 774B D2 06 22 77 2 10 FC 3E :2.DE 
755B ミ 2 59 DO 32 6E DO 3E 77 : さ .8BO 775O 3D 11 2 00 21 7 DO 0QG6 :1.E フ 7 
7560 32 5 DO 3E 76 32 6F DO : さ 3.7F 775B OE 77 19 10 FC 3E 71 21 i2.7a 
7568 SE 70 06 16 21 C1 D1 77 :2.F4 ファ 760 9D DO 06 OE 77 19 10 FC :3.1D 
7570 2 さ 10 FC 3E さ D 06 0 11 =:1.C9 7768 SE OO 21 7B DB O6 OE 11 :1.D7 
7578 2 OO 21 BO DO フ 77 19 10 :2.39 フ 77O O6 OO C5 06 22 フフ 2 さ 10 si1.9D 
ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 一 1 呈 O9 フ 77B FC 19 ビ 1 10 F5 OO CO OO :2.DB 
75BO FC 3E 71 O6 OB 21 97 DO : さ .41 。 。 。 | ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 146H 
75 ヨ ヨコ 7 フ 7 19 10 FC 3E OO 21 1 :2. フ 7C フ 7BO 3E OO 21 7 DO 11 O4 OO si1.BE 
759O DB 06 OB 11 12 OO C5 06 1.D4 778 ヨ 06 OF C5 06 24 77 23 10 *1.8E 
759 16 77 23 10 FC 19 C1 10 :2.a6 779O FC 19 ビ 1 10 F5 3E 70 32 : さ 3.BB 
75QAO F5 OO OO OO CD B6 B1 3E : さ . さ 7 779 7QA DO 32 9D DO 3E さ C 06 : さ .69 
75A ヨ さ C さ 2 5 .DO さ 2 6F DO 3E :3.45 フ 7AO 24 21 QQ D2 77 2 さ 10 FC : さ 。6 フ 7 
75BO 77 さ 2 57 DO 3E 76 32 70 : さ .26 ファ 7A ヨ る E 70 21 7 DB ヨ 06 OF 11 :2.47 
75BB DO さ E 7Q 06 1 21 E ヨ D1 : さ 3. フ 6 77BO O4 OO C5 O6 24 77 23 1O si1.9D 
ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 174F 77BB FC 19 C1 10 FOO OO OO si2.DB 
フ 5CO 77 2 さ 10 FC さ E ミ D 06 09 :2. さ 0 。 。 | 。 ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 14B6 
75CB 11 2 OO 21 7F DO 77 19 :2.③9 フ 7CO さ 3E OO Oo6 24 21 7 DO 77 s2Z。4a 
75DO 10 FC 3E 71 06 09 21 9 :2.S 77CB 2 さ 10 FC 21 aa D2 06 24 s2。F6 
75DB DO 77 19 10 FC さ 3E OO 21 i2.CB フ 7DO 77 2 さ 10 FC OO OO OO 3E *1.E4 
75EO ヨ O D ヨ 06 09 11 10 00 C5 s2.4D 77DB 5O さ 32 52 DB 32 75 DB 32 : さ 。5D 
75EB 06 1B 77 23 10 FC 19 C1 :2.9E 77EO D2 DQ さ 32 F5 DaQ 3E 00 06 :3.F1 
75FO 10 F5 OO QO 00 CD Be 1 : ミ .09 77EB 22 21 5 る DB 77 2 さ 10 FC * さ 。14 
75FB 3 さ E さじ さ 2 57 DO 32 70 DO : さ .45 フ 7FO 06 22 21 D さ 3 Da 77 23 10 s2。a0 
ーー 当 ーー ニニ ニニ ニニ ニー ニー ニニ ーー ニニ ニー ニー ニニ ュー ニー 14FO フ 77F FC OO OO OO CD 44 2 OO si2.BF 
フ 600 ミ E フフ 7 さ 2 56 DO SE 7Z6 ミ 2 =:2.FS =。。。 。 | 。 ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 一 16B5 
フ 60 ヨ 71 DO SE 70 06 1 21 OF :2.3F フ 7BOO OO OO OO OO OO OO OO OO OO.OO 
フ 7610 .D2 77 23 10 FC 3E 3D 21 : さ 。14 7 ヨ 0 ヨ OO QQO QQ OO OO QO OO OO :O.0Q 
フ 61 日 7E DO 06 Qa 11 2 00 フ 77 :2.0E 7B10 OO 3E 20 さ 2 355 DB OO OO sl.aO 
7620 19 10 FC さる E 71 21 99 DO : ミ .5E 7 ヨ 18 0QO OO oo OO Qoo oo OO QQ :O.0O 
762 ヨ 06 QaQ 77 19 10 FC さ E OO *1.Ea 7B2O OO OO OO 00 QO OO OO _ 00 giO.0O 
76 さ O 21 7F DB 11 OE OO 06 Oa :1.a7 7 ヨ 2 ヨ QQO OO OO QO OO oo oO QO :O.0O 
フ 763 C5 06 1 77 2 さ 10 FC 19 :2.a4 フミ O OO OO OO OO OO OO OO OO sO0.0O 
ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 一 1 マ E フ 7 ヨミ 3 0O CD C5 1 3E 20 32 さ フ 7 s2。.Da 
フ 640 1 10 F OO QO QO CD B6 : ミ .49 。 。 | 。 ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 一 047 ム 
フ 764B B1 3E さじ 32 56 DO 32 71 =:2.F6 フ 740 DB CD FE BB 11 Oo 00 06 =: ミ .4E 
7650 DO さ E 77 32 55 DO さ E フ 76 :3.90 748 11 21 5 さ DO C5 D5 06 22 : さ 。17 
765B 32 72 DO SE 70 06 1C 21 :2.65 7 ヨ 50 1E さ 2 CD D4 1 BB 30 06 : さ 。6 さ 
フ 7660 さ 6 D2 77 2 る 10 FC 3E さ D : ミ .29 7B5B さ E B9 77 CD En 1 2 さ 10 =: さ 。.D9 
7668 21 7D DO 06 OB 11 2 OO 1.BB 7 ヨ 60 F1 D1 19 1 10 E6 00 0O : る 。.92 
フ 670 77 19 10 FC 3E フ 1 21 9 3.0G6 7 ヨ 6B OO さ 3E OO 32 9E 9 ミ OO0 21 1.C2 
フ 7678B DO Q6 OB 77 19 1O FC 3E =:2.BB フ 770 52 DO さ 3E る B 11 28 00 06 s1.Da 
ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 16D6 77B 11 77 19 1O FC 3E フ 70 21 :2。2C 
フ 768O OO 21 7E DB 11 OF OO O6 =1.9Q | 。 ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 174B 
フ 688 OB C5 06 1C フ 77 23 10 FC si2.9 78BO 52 DB 06 11 77 19 10 FC :2.DD 
769O 19 C1 1O F5 OO OO OO CD si2.aC 7 OO 00 QQ 21 7 DO さ E 7B :2.1F 
769 ヨ 5E 1 3E 3C 32 5 DO 32 』2.E2 7890 06 11 77 19 10 FC さ E 70 2.61 
76A0 72 DO 3E 77 32 54 DO 3E : さ .BB 789 21 7 DB 06 11 77 19 10 2。25 
7aa ヨ 76 32 フミ 3 DO SE 70 06 1E =2.BD 7BQO FC OO OO OO さ 3E 5 コミ さ 2 OB 1.CA 
76BO 21 5D D2 77 23 1O FC 3E =: さ .34 7 ヨ Q ヨ DE さ 2 QOC DB OO OO OO OO =:1.F4 
76BB 3D 21 7C DO 11 2 ヨ OO 06 =: 1.E9 7BBO OO OO OO OO OO CD 4 81 :1.96 
ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 一 1 っ 5 7 ヨ B ヨ OO OO CD 2 2 Q00 00 0Q0 1.D1 
フ 6CO 0OC 7 アア 19 10 FC る E ア 1 21 :2.7 = 。 。 | 。 ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 107 
76CB 9B DO 11 2B 00 06 OF 77 ki2.2D 7BCO 00 00 OO 00 00 OO CD 1E ksQ.EB 
76DO 19 10 FC 3E 00 21 7D D ヨ :2.D9 7BCB ヨミ 00 OO OO CD 3 3 00 :S.OB 
76DB 11 QA QO 06 OC C5 06 1E 1.16 7BDO OO QQO・aQF さ 3E C フ DD BE OO : さ 3.4F 
フ 6EO フ 77 23 10 FC 19 1 10 F5 : さ 3. フ 7BDB 20 さ 4 CD 74 3 OO OO OO :2。18 
フ 76EB OO OO OO CD B6 1 3E 3 :2.7E フ 7BEO O1 OO QO ヨ C5 D5 11 2 OO 1.DC 
フ 6FO ミ 2 54 DO さ 2 フミ DO SE フ 77 =: さ 3.8 ヨ 0 7BEB O1 11 OO FD 21 53 DO 3E =2。91 
76FB さ 2 3 DO SE 76 32 74 DO : さ 3.7F 7BFO C7 FD BE OO 20 QD D1 C1 :4.41 
ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 一 1596 78FB DD 72 OO DD 09 DD 7 ミ OO :.B5 
フ 700 3E 70 0O6 20 21 4 D2 フフ :2.FE =。。 | 。 ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 一 1490 
フ 770 2 さ 10 FC 3E 3D 21 7B DO =: さ 3.16 7900 ミ BA 7B FD 19 OB 7 B1 :4.3F 
フ 7710 06 OD 11 2 日 00 77 19 10 :O.EC 790 ヨ 20 E5 D1 C1 1 ミ F CD H7 :4.72 
フフ 1 日 FC SE 71 06 OD 21 9 DO : さ る .4B フ 791O ヨミ O1 OO OB C5 D5 E5 11 : さ .1C 
フ 720 77 19 10 FC 3 る E OO 21 7C :2.7 フ フ 91 日 2 ヨ 00 01 11 OO FD 21 き k1。.B 
フ 772 ヨ DB 11 0 ヨ 0Q0 06 OD C5 06 sl1.CF 7920 DO 3E EB FD BE Q1 20 OS s さ 。D4 
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片山 まさ ゆき / 竹 書房 ・ 近 代 麻雀 オリ ジ ナ ル 
パリ コン エル ビス マグ / 


(G.RAM) 


10 月 発売 !! 


片山 まさ ゆき の 

コン ピュ ー タ マー ジャ ング 
スー パー ツガ ン 

FOH MZ700・1200・KeE・ 選 (48K) 
53njledliD9 
D の OPDS 了 


感動 ! の リア ル タ イ ム グ ゲーム 
9.500 円 


新 パ ッ ケ ー ジ で また また 登場 の リア ル タ イ ム ゲ ー ム 。 
高 さ I120m の ビル を 登り きり 、 無 事 屋 上 まで た どり つく こ 
と が 君 は で きる か !? 冷 静 な 判断 と 、 パ ター ン を 読み と る 
力 と の 2 つが 必要 だ ! ハイ スコ アー を と っ て 、 名 前 を 登 
録 。 み ん な で きそう ビル ディ ング ホッ パー ナイ ト ! 


タス ク フ ォ ー ツ 高知 〒780 高知 市 朝食 内 434-14 


通販 御 希 望 の 方 は 送料 300 円 と 代金 を そえ て 当社 まで お 送り 下さ い 。 


タプ 4 oniMz 1983.10. 


ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 18EB 
79CO DD E1 E1 D1 C1 F1 CS OO : 呈 .E5 
79FB OO OO FF FF OO OO FF FF : き .FC 
79DO 0QO OO FF FF OO QO FF FF : さ .FC 


7ROO FF FF OO OO -FF FF OO _ OO 3。F ビ 
70 ヨ FF FF QQO OO FF FF 0OQ0_ 00 : さ . FC 
7n1O FF FF OO 0QO FF FF_00_ 00 5 さき 。FC 


次 号 に つづ きま す 。 


お 詫び と 訂正 


誌 9 月 号 3 ペ ー ジ 掲載 の シャ ー プ 広告 中 
MZ-1K06 標準 価格 320,000 円 
MZ-3531 標準 価格 32.000 円 と ある の は , 


MZ-1K06 標準 価格 


38.000 円 

MZ-3531 標準 価格 320.000 円 の 誤り で し た 。 

ここ に 対し ん で , お 詫び と 訂正 を させ て いた だ きま す 。 
扱 店 


GTAH THEK =sms 


スペ ー ス アド ベン チ ヤ ー の 古典 に 挑戦 し よう 


杉浦 男 一 


昔 な つ か し の STAR TREK で す 。 LIFE GAME (7 月 号 ), 3D-MAZE (8 月 号 ), HOUSE MASE ( 9 月 号 ) と つづ びく クラ シッ ク ゲ 
ー ム ・ シ リー ズ の 第 4 弾 で す が , 今回 は , MZ, X1 全 機種 対応 と いう こと で プロ グラ ム の 単純 化 を 図り まし た 。 読者 の 皆さん が ご 自分 の 
好み に あわ せ て 脚色 し , メッ セー ジ や スポ ッ ク 博 士 を 初め と する 搭乗 員 の セリ フ , 光子 魚雷 や フェ ザー 砲 ( ビ ー ム 砲 ) の キャ ラク タ 設 定 , 
カラ ー 効 果 , サウ ンド 効果 , セン サ や マッ プ , エン タプ ライ ズ の 攻撃 , クリ ン ゴ ン の 反撃 , 応急 処置 な ど 。 い つっ そう すばらし い STAR 
TREK を 作っ て いた だ きた いと 思い ます 。 自信 作 は Oh ! MZ STAR TREK 係 まで ご 投稿 くだ さい (編集 部 )。 


ノ 須 っ タート レッ 2c は ky 


みな る ん は 「 ス ター トレ ッ ク 」 な る ゲー 
ム を 知っ て いま すか ? マイ コン 歴 の 古い 
方 な 6 よく ご 存じ の こと と 思い ます 。 こ の 
ゲー ム に 熱中 され だ 人 も 多い で し ょ う 。 最 
近 に な っ て 初め て マイ コン を や り は じ め た 
人 で も を その 名 前 で らい は 聞い た こと が ある 
の で は な いで し ょ うか 。 

プロ グラ ム も いく つか 市 販 さ れ , 数 多く 
の 雑誌 や 本 で も と りあ げ ら れ て きま し た 。 

少し まえ に 見 た テレ ビ の 革 コ ンピュータ 
番組 で も .「 ス ター トレ ッ ク を や っ て いる と 
徹夜 で 熱中 し て し まう 」 と いう よう な 話 を 
聞い た こと が あり ます 。 ま た ,「 こ の スタ ー 
トレ ッ ク を や り だ た いた だ め に コン ピュ ー タ を 
買っ た 」 な ん て 話 も よく 耳 に し た も の で し 
だ 。 

と ころ が 現在 で は 新しい ゲー ム が 次 々 と 
開発 る きれ, スタ ー ト レッ ク の 影 が し だ い に 
薄く な っ て き て いま す 。 現 在 の パッ コン ユ 
ー ザ ー の 中 で 何 パ ー セ ント の 人 が スタ ー ト 
レッ ク の ルー ル を 詳し 〈 知 っ て いる で し ょ 
う か 。 ス ター トレ ッ ク も また , 苦 懐 か し き 
ゲー ム の ひと つ に な りつ つ あ る よう で す 。 

本 来 .、 ス ター トレ ッ ク は アメ リカ の NBC 
テレ ビ で 1966 年 か ら 1974 年 まで の 長期 に わ 
た っ て 放映 され た 空想 科学 物語 で . これ は 
テレ ビ や 映画 を 通じ て 日 本 で も 紹介 きれ ま 
た だ 。 

た し か 「 夏 休み 子供 ……」 で も 放映 され 
て いた と 思い ます 。 SF 好き の わた し と し ま 
し て は , その 時 間 が くる の が 楽し み で 待ち 


ど お し か っ た も の で す 。 短 か い 髪 型 。 つ り 
上 が っ た まゆ ゅ 毛 , それ に と が っ た 耳 の 独特 
な スポ ッ ク の 顔 は 今 で も 強烈 な 印象 と し て 
記憶 に 残っ て いま す 。 


フ ログ ラム を 作る に あたっ て 


過去 の 文献 に スタ ー ト レッ ク を 扱っ た も 
の は た い へ ん 多い の で す が , 当時 あま り に 
有名 な ゲー ム だ っ た た めか ,「 ゲ ー ム の スト 
ー リ ー や ルー ル は 省略 し ます 」 と いう の が 
いく つか あり まし た 。 

そん な な か で スタ ー ト レッ ク の 歴史 か ら 
コマ ンド の 説明 まで 詳し 〈 載っ て いる 本 を 
お し えて も らい まし た (文献 1)。 こ の 中 に 
114 行 程 の 短 か い スタ ー ト レッ ク の ゲー ム プ 
ログ ラム が 載っ て いま す 。 は じ め は この プ 
ログ ラム を 移植 し て 改良 し て いこ うと 思っ 
た の で す が , あま り に 短 か か っ た の で 最初 
か ら ま っ た く の オ リ ジ ナ ル で 作り 直し て み 
まし だ S 

本 誌 で も 1982 年 の 10 月 号 で 1 度 ス ター ト 
レッ ク の プロ グラ ム を 発表 し て いま す 。 東 
大 SF 研究 会 で 開発 され た も の で , 後に ト 
ム ト ム ソフ ト か ら 市 販 さ れ ま し た が , 行 番 
号 が 50300 に まで 及ぶ 本 格 的 な も の で す 。 た 
い へ ん 良く で きだ ゲーム で す が 。 これ だ け 
長い と 打ち 込む だ け で も だ い へ ん な こと で 
す 。 

今回 紹介 する スタ ー ト レッ ク は , 内 容 は 
た いし た も の で は な い の で す が , 手軽 に 打 
ちこ め る 程度 の 長 る です 。 あ な た も 軽い 気 
持ち で 打ち 込ん で , 懐か し き 古 典 ゲ ー ム に 
トラ イ し て みて くだ る きい 。 


ノア ケー ム の 


まず , スタ ー ト レッ ク を 知ら な い 人 の た 
め に スト ー リ ー を 簡単 に 説明 し て お きま す 。 
あな た だ は 地球 か ら 飛 び 立 っ た 宇宙 船 エ ン 
ター プラ イズ 号 の 船長 (キャ プ テ ン ・ カ ー 
ク ) で , 敵 の 乗っ た クリ ン ゴ ン を 探し て ビ 
ー ム や 光子 魚雷 を 使っ て 破壊 し て いき , 宇 
宙 の 平和 を 守ら ね ば な り ま せん 。 

あな た に 与え られ だ 時 間 は 30 年 間 。 

クリ ン ゴ ン を すべ で て 破壊 する 前 に 30 年 が 
過ぎ た り , エネ ルギー が 無く な る と , 宇宙 
は クリ ン ゴ ン に よっ て 征服 され て し まい ま 
す 。 

この プロ グラ ム を 打ち 込ん で RUN すると, 
まず ` 難 か し きる? を 聞い て きま す 。 

この と き 1 一 9 の 好き な 数 字 を 打ち ます 
(数 が 大 きい ほど 難 か し く な り ま す )。 

する と , 大 宇宙 (GALAXY) に お ける ク 
リン ゴン の 場所 (SECTOR) が 表示 る れ ま 
す 。 で きれ ば この 数 値 を 記憶 し て お きま し 
ょ う 。 

次 に 小宇宙 (QUADRANT) の 地図 が 表 
示 る れ て , いよ いよ スタ ー ト で す 。 


ノワ 湖 コ マッ ド 
コマ ンド は 1 一 6 まで あっ て それ ぞ れ の 


数 字 の キー を 押す こと で 実行 され ます 。 
この と き キー を 押す 必要 は あり ませ ん 。 


@ コ マン ド 1 …… WARP-…… 
WARP (ワー プ ) と は 宇宙 空間 を 移動 す 
る た め の 命令 で , 国 を 押し ます と まず 移動 


特集 STAR TREK 5 


する COURSE (コー ス ) を 開い て きま す 。 

ュー ス は 画面 右側 に 表示 され て いる 数 値 
で 指定 し ます 。 

1 一 8 と な っ て いま す が 小 数 に よる 指定 
も 可能 で す の で 実際 は 1.0 一 8.9 ま で の 値 を 
入力 し ます 。 

次 に ENERGY (エネ ルギー) と 聞い て き 
まれ 

これ は 移動 距離 に 相当 し ます 。 

た と ぇ ば 1 を 入力 する と 大 宇宙 で の 1 つ 
と な り の セク ター に ワー プ ' し ます 。 

あま り 大 き な 値 を 入れ る と 大 宇宙 の 外 へ 
出 て し まい 。 レー ダー も 使え な く な っ て し 
まい ます 。 

1 より 小さ い 値 だ と 小宇宙 内 で 0.1 に つき 
1 セク ター だ け 移 動 し ます 。 

この とき , 星 (*) や K (クリ ン ゴ ン ) に 
ぶつ か る と COLLIDE (衝突 ) の メッ セー 
ジ を 表示 し て それ 以上 先 に 進む こと は で き 
ませ ん 。 


@ コ マン ド 2 …… QUADRANT MAP…… 

これ は ゲー ム を 始め て 最初 に 出 て きた 画 
面 で , この 状態 で すべ て の コマ ンド が 使え 
まず 。 

言い 忘れ まし た だ が, あな た の エン ター プ 
ライ ズ 号 は (E) で 表わさ る れ て いま す 。 

また だ た, クリ ン ゴ ン は (K), 星 は (*), 味 
方 の 基地 は (B), ( : ) は 宇宙 空間 つまり 
な に も 無い こと を 意味 し て いま す 。 


@ コ マン ド 3 …… GALAXY MAP…… 

これ は 大 宇宙 全体 を 見 る こと が で きる レ 
ー ダ ー だ し と 思 っ て くだ さい 。 

四角 の 1 つ 1 つが それ ぞ れ の 人 小宇宙 で , 
「※※ ま 」 は まだ 行っ た こと の 無い 未知 の 宇 
宙 で す 。 

数 字 が 入っ て いる と ころ は 次 の よう な 意 
味 を も っ て いま す 。 


クリ ン ゴ ン の 数 基地 の 数 


例 
210 : クリ ン ゴ ン 2 
基地 | 


@ コ マン ド 4…… BEAM…… 
クリ ン ゴ ン を 攻撃 する た め の 武 器 の 1 つ 


タ 4 の OniMzZ 1983.10. 


で 星 の う し ろ に 居る 敵 も 破壊 する こと が で 
きま す 。 た だ だ し リー の と き と 同 世 よ うに 
エネ ルギー が 消費 され ます 。 

コー ス の 指定 6 も ワープ" の と き と 同 様 で す 。 
本 来 な ら ば フェ ザー 砲 が ここ に 入る の で 
す が , 作者 の オリ ジ ナ ル と し て ビー ム に 変 
で みみ まし た 。 


e コマ ンド 5……TORPEDOS…… 

これ も また 武器 の 1 つ で 光子 魚雷 を 発射 
する 命令 で す 。 

ュー ス の 指定 は ワー プ と 同様 で す が , こ 
れ は エネ ルギー を 必要 と し ませ ん 。 

た だ し 魚雷 は 30 発 し か 使え ませ ん 。 


@ コ マン ド 6…… COMPUTER DATA・… 

これ は 魚雷 の 残り の 数 や . モク ター な ど 
の いろ いろ な 情報 を 見 る た め の 命 令 で す 。 

また 右側 に は コマ ンド 表 が 出る の で , コ 
マン ド を まだ 覚え て いな いと き は [を 押す 
と わか る よう に な っ て いま す 。 


2 < の te の W ヵ な ルール 


ュー ス の 指定 や コマ ンド を まち が えて し 
まっ ただ とき は 0 を 入力 する と 1 つ 前 の コマ 
ンド 待ち 状態 に 戻り , や り 直 し が で きま す 。 

クリ ン ゴ ン か ら 攻 撃 し て て る こと も あり 
ます 。 ま た , 宇宙 あら し も あっ て それ ぞ れ 
の コマ ンド が 使え な く な る と き が あり ます 。 

使え な く な っ た 場合 は 「DAMAGED CO 
MMAND 一 」 と いう メッ セー ジ が 出 ま す 。 

特に 同じ クオ ドラ ント の 内 に クリ ン ゴ ン 
が いる と 故障 する 確率 が 高い の で , で きる 
だ け 少 な い ス テッ プ 数 で 敵 を 破壊 せ ね ば な 
り ま せん 。 

故障 を 直す に は 基地 に 着陸 すれ ば よい の 
で す 。 宇宙 全体 に 3 ヵ所 し か 基地 は あり ま 
せん 。 ま た , 基地 に 着い た 場合 エネ ルギー 
も 元 の 状態 に 回 復 し て いま す 。 

ちな み に , ワー プ が 故障 し て も 1 以下 で 
の 移動 は 可能 で す 。 早 目 に 基地 で 直し て お 
きま し よう 。 


アア フク ラム c っ いて 


以前 。 わ た し が や っ だ た スター トレ ッ ク で 
は ワー プ す る た びに 同じ 小宇宙 な の に 星 の 
位置 が 違っ て いる の が あり まし た 。 

これ で は どう も 気に入ら な い の で , メモ 


リ は 多く 使い ます が , 配列 に 文字 変数 配列 
を 使い 宇宙 の 構造 を 記憶 する よう に し まし 
だ 。 

これ で 同じ 宇宙 な の に その た びに 星 の 位 
置 が 違う と いう 矛盾 を な くし て あり ます 。 
また だ , 難 か し る を 入力 する と き の 待 ち 時 
間 に ょ っ て 乱数 の 改新 を し て いま す 

合 回 の プロ グラ ム は MZ-80K/C で も その 
まま 使え る よう に COLOR 文 は 使っ て いま 
せん 。 色 は みな さん で 自由 に つけ て くだ さき 
い 。 

また , ワー プ の と き に エン ター プラ イズ 
号 を 表示 させ た り , GAME OVER の と き 
に 成績 評価 を 加え る な ど し て , この ゲー ム 
を 改良 し て みて は いか が で し ょ うか 。 

あま り 解 読 し や すい プロ グラ ム で は あり 
ませ ん が , 表 1 に 変数 表 を 示し ます の て 改 
造 の と き の 参 考 に し て くだ さい 。 

最後 に . こ の プロ グラ ム で も MZ-80K/C/ 
1200 で の SP-5030 で も MZ-700 の S-BASI 
C で も その まま で 走り ます 。 
MZ-80B/2000/2200 で 使う と き は 

行 番号 85 CONSOLE C40 
を 加え て , 

SPC (-)。 一 一 SPACE$ (< ) 

PRINT ` 四 "一 > PRINT CHR$(6) 
と 変更 する だ け で 使え ます 。 

この よう に , MZ-80B/2000 の キー ボー ド 
か ら そ の まま 打ち 込め る キャ ラク タ ば か り 
を 使っ て いま す 。 

さらに, X1 で も 同じ よう な 変更 どけ で 
その まま 使え ます 。 

使用 し て いる 機種 が MZ-700 の 場合 , 次 
ペー ジ の リス ト 1 を 追加 し て くだ さい 。 
これ を 入れ る こと で , 間違っ た グラ フキ 
ー を 入力 し て も ゲー ム が 途中 で 中 断 し て し 
まう こと は 無く な り ま す 。 


参考 文献 


|) 石田 晴久 , マイ クロ コン ピュ ー タ の 
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大 宇宙 の デー タ と 小宇宙 の 残り の エネ ルギー 


構造 記憶 用 残り の 年 数 
小宇宙 の デー タ 残り の 魚雷 の 数 
コマ ンド 番号 難 か し さ 
コマ ンド ok 呈 0 人 蘭 し そい る ュー 


大 宇宙 で の 位置 ワー プ や ビー ム の 時 の エネ ルギー 
小宇宙 で の 位置 ワー プ や ビー ム の 移動 量 
クリ ン ゴ ン の 数 エネ ルギー 消費 の カウ ンタ 


MZ-700 用 追加 プロ グラ ム 


5 ロ N ERROR _ GOTO SSQOQO 


2510 IF ERL=1040 THEN RESUME 1049 


IF ERL=1OOO_ THEN RESUNMNE 1000 


10 RENM ポポ 米光 水 ボ 水 水 ボボ ボボ 涼 水 水 玉水 水 ポ 素 水 ボ 

20 RENM ※ 氷 ※ GTAR TREK 氷 氷 束 

さ O_RENM ※※※ も る も 1 

40 REM *K※※ MZ- ヨ 0 に /C/1200/700 し を 1 

5O_REM *%※ MZーBOB/2O00/2200』X1 水玉 

60_ REM ポポ ポ 氷 氷 氷 

70_REM ※ 涼 ※ SB-OOO さ SUBTIURA 水 水 ※ 

0O_RENM ポポ 氷水 氷水 氷 ボ 水素 氷 氷 氷 氷 氷 氷 氷 氷 氷 氷 氷 氷 ボ 

90 DIM C ま (B。B) , 生ま (BB) 』KX( さ 30) 』KY (30) 』 (6) : TEMPD 7 
100 DEFFNR(X)=INT(RND( 1 ) ※※X ) +1 

11O PRINT " 必 ":FRINT "ムズ "カジ サキ や (1-9) "5 

120 GET M ま :M=AGC(M ま も + す "リツ )ー4 日 :TF (M>9)+(MS1) THEN 120 
1 さ O_FRINT MiPRINTiG ロ =3OIE=7OOO+ (NM>5) *MX 呈 OO N= さ Oi FUR 1 エ =1 TO 65Ra(I)=OsNEXT 1 
140 FUR 1=1 TO VaL(RIGHT ま (TI も ょ 22) ) iR ド =RND(1) iNEXT 1 
150 CX=FNR( 日 ) iCY=FNR (日 ) : TX=FNR (日 ) : TY=FNR (日 ) 

160 FRINT "KLINGHNS "SECTOR" 

17O_ REN 王 謗 間 GLLQXY 還 是 軒 

1 ヨ 0 FR 1=1 TO :FR J=1 TO 

190 C ま (T。J)="OO"+STR ま (FNR(6) 一 1 ) iNEXT J』1 

200 ド =FNR(M)+2 ヨ +MiFHR 1=1 TO 

つ 1O RX=FNR (日 ) : RY=FNR (日 ) : じ ま = じ ま (RX』RY) iPRINT RXI" ーー"RYs 
220 IF BC(C 和 も ) = フフ THEN 210 

2 さ O じ ま (RX RY ) = ニ じ HR ま (QRSC( じ まま ) 二 1) +RTGBHT 和 (まつ) 

240 NEXT IEMUSIC"RRR" 

25O FDR !=1 TH さ 

260 RX=FNR(B) : RY=FNR (日 ) : じ 上 も = じ 和 ま (RX』 RY ) 

270 CC も (RX』RY ) =LEFT ま ( ビ ま 』1)+ "1"+RTBHT 生 (まま 。1) NEXT 1 
2BO に ま =" リ WsBHSUB 450: BUSUB 690:TTT ま ="OO00000" 5 BUTH 400 
270_ REN 較 還 較 QTN 較 凍 較 

さ OO BET 人 まま : QASC (人生 キ " "うー4 日 ETF (< く 1) 二 (6) THEN さ 5Q0 
さ 10 CURSR 1 さ 。2OEFPRINT 人 

さ 2O_ UN 人 BUSUB 1000。690』 17 さ 0』 ワウ O』19O00。 193O 

ささ O IF VaL( ま ) く > THEN =VaL( 人 も) =TF >1 THEN さ 20 
340 IF _RND(1) 1 一 (VRL (LEFT 生 (征吾 。 1 ) ) * 日 +M) /B0 THEN R(R)=1:BUSUB 570 
3 さ 50 IF VaL(TI*)=Q THEN さ 3QQO 

3 さ 6O E=EーVaL (RTGHT 邊 (TT ま ょ 2) ) :TT ま =" リ O00000" 

370 IF (EX1)+(NS1) THEN 2390 

3BO IF KK=O THEN 242O 

さ 9O_ ビ ロ =C ロ D+1 : IF CD ジ >6 ら 0OーM※ さ る THEN _N=N 一 INT (CD/ (60ーM※ さ ) ) ピロ = テウ 

40O CURSUR ささ 』16kFRINT SFC(4-LEN(STR ま (E) ) ) iE 

41O CURSDR 2B』17:PRINT "LIMIT"INI "ネフ リ " 

420 CURSOR 1』2OIFRINT "COMMAND "3 SFC(2) 

43 さ O_FRINT SPEC( さ O)iFRINT SFCE(30) i BHTH さ QO 

440 RENM 還 還 間 DUADRANT 商 還 

450 ITF (EXX1)+ す (EX ジ >B) 二 (CYS1)+(EY2B) THEN じ ま =" リ "8sBHTOD 640 

460 避 = ビ ま (CX』CY) 

470 IF LEN(C じ まま) ※ さ THEN 630 

4 ヨ 0 本 1=TXsT2=TY 

49O FUR 1 エ =1 TD BiFUR =1 TO BT まま (T。J)= テ "EVENEXT 。 エ 

OO し LL=VL (MID ま ( じ ま 。 さ 。 1 ) ) 

ら 10 IF LL=O THEN 55O 


特集 STAR TREK 


52O0 FOR 1=1 TO LL 

53 さ 0O_RX=FNR(B) : RY=FNR (日 ) : IF T ま (RX』RY)="*%※" THEN 530 
5409 まま (RX』RY)="*K"sNEXT 1 

55O し LL し =VaL (MID ま ( じ 和 ま ょ で 。 1) ) 

56O IF LL=O THEN 60O 

57O FR エ =1 TO LL 

SBO_RX=FNR (日 ) s RY= ニ FNR(B) =: IF (RXRY〉) ぶ >"s" THEN 5BO 
コ 90 (RXRY)="B"sNEXT 1 

600 FOUR =1 TO BiFR 1=1 TO BB 

ら 610 C ま (CX』CY) =C ま (CX。CY)+ 丁 生ま (1。J) NEXT エゴ 

62O じ ま = じ (EX 』CY) iRETURN 

630 IF (T1=TX) ※(TS=TY) THEN RETURN 

640_ PPF=4: 丁 1= ニ TXsT=TY e 

65O_ FUR ゴ =1 TO FOR エ =1 T ロ 

らら 60 T 和 ま ( エ 。J) =MTD ま (じじ ま ょ PP 。 1 ) =: ビビ =FP+1 s NEXT TL。J 


670_ RETURN 

6BO_ REN 還 議 軒 DUQDRRNT MQF 還 還 較 

690 FRINT " 層 "3iPRINT " **※ GTAR TREK *%%※"sPRINT 
700 PRINT " も 、 選 さき 4 舎 @ "7 生日 "sPRINT 


710 FOR J=1 TO PRINT Ji" "isFHR 1=1 TO 日 : TF じ ま $="" THEN 73O 
720 TIF (1=TX〉)※(J=TY) THEN PRINT "E "iiGOTD 75O 


フミ O IF (2)=1 THEN PRINT " "s BHT 75O 

74O_PRINT 丁 生 (1』d) 857" 

7SO_ NEXT IEPRINTEPRINTIiNEXT J 

760 IF に も =" リ THEN CURSUR 2S』2OIPRINT "MISS CUSE ! "= MUSIC"RR" =BDTO B5O 


770 IF (CS2= ニ CX ) *( ビ 3 さ =CY ) THEN 3Q 

7B0 CE= ニ CX ビ さ = じ YI ITF (SC( じ C+"! "うく 49)+( 人 (2) =1)+( じ まま ="") THEN B5O 
790 FUR 1=1 TO VAL(LEFT$(C ま 。1 ) ) 

BOO KX( エ T)=FNR(B) 5 に Y(1)=FNR(B) : IF (KX(1)=TX)*(KY(T)=TY) THEN BOO 
ヨ 10 IF 生生 (EX(T) 』KY(T) ) : 5" THEN QO 

B2O_NEXT 1 

B さ O IF QASC( じ ま )=4B THEN B5O 

B4O_FUR =1 TO VaL (LEFT ま ( じ ま 。1 ) ) = CURSHR KX(T)*※ さ 。KY(1) *2+2EPRINT "K"ENEXT 1 
5O CURSUR 27 ょ さ :PRINT"*Kk CHURSE ネ ※ 

B60 CURSUR 29 ょ 5 EPRINT" さ 

70 CURSOR 29』6 kPRINT" 4 | 2 

B8O CURSR 29』7 EPRINT" へ ヽ 1 ア 〆 

ヨ 90 CURSHR 29。 日 FRINT" NZ 

900 CURSUR 29 ょ 9 EPRINT "ーーー キ ーーー1 


910 CURSUR 29。10IPRTNT" だ 
920 CURSDR 29。11:PRINT" ググ 1 SN 
930 CURSOR 29。12sPRINT" 6 | 
940 CURSDR 29。13:FPRINT" 0 


950 CURSUR 27』16sPRTINT "ENERGY"sE 
960 IF (2)=1 THEN =2:BDTD 990 
970_ RETURN 

7BO RENM 還 還 時 EY IN 還 還 還 


790 IF (aa) THEN CURSDR 20』2O:PRTNT "DAMABED CDMMAND "iaEMUSIC "CSR ウ R"』 BUTH 2090 


1000 CURSHR 0O』21: INPUT " CHURSE (0- 日 ) "iCS 

1010 an=OE IF CS=O THEN 2OBO 

1020 IF (CSG>=9)+ (CS く O) THEN 100QO 

103O IF =5 THEN 109O 

1040 CURSHR O』22sTNFUT " ENERBY (0-B) "EE TF KE=O THEN 1OQO 
105O0 1IF (=4)*※(KE く 1) THEN 1Q04O 

106O IF (KE>=9)+(KESO) THEN 1040 

1070 E=EーINT (KE※%100) : IF E<1 THEN E=O 

10BO IF (R()=1)※%※(KE>=1) THEN 990 

1090 IF CS く >INT(CS) THEN 1120 

1100_ MX=ー((CS< プ 7) * (ES> さ ) ) ( (CS くさ ) +( ビ 5> フ ) ) 

1110 MY=(CG く = 紀 ) -(CG:=6) (=5 ) -(CG=1 ) : GHT ロ 1130 

112O CC=(C5ー1 ) * . 7B54 : MX= ニ CHS (ビビ ) : MY ニー5 IN (CC ) : MX メニ MX+SBN (MX ) ※。 王 : MY=MY+SBN (MY ) ※. 王 
1130 IF (人 =1) *※(KE>=1 ) THEN 1670 

1140 X1=INT(TX) :Y1= ニ INT(TY) : X2= ニ 0: YB2= ニ OE s ビ X= ニ INT (CX ) : CY=INT ( じ Y) 

115O _ ロ N 欠 - さ GT 1170。11 ヨ 0 

1160 B ま ="E"EBHTH 119O 

1170 H ま =" 提 "3: BUT 1190 

118BO HB ま = リ "@ の "ミロ = ニ ロ ー1 

1190 IF CB=INT(CS) THEN 1230 

1200 X デ = ニ X ビ +MXi TF BB(X2) >1 THEN X1=INT(X1+SBN (IMX ) ) : X コ = ニ X つ ーSBN (MX 〉 
1210 Y2= ニ YS+MYITF BB(Y2) 1 THEN Y1=INT(Y1+GGN (MY ) ) : Y コ =Y2ーSGN (MY ) 
122O BUTU 1240 

1 ご さき O X1= ニ INT(X1+MX) :Y1= ニ INT(Y1+MY) 

1240 IF (X1 く 1)+(X1 日 ) 上 (Y1 ぐ 1)+(Y1S 日 ) THEN 157O 

125O VM ソ =VaL (LEF 丁 生ま (まま 。1 ) ) : 丁 生 ニ 丁 生 (X1 。Y1 ) : IF り V=O THEN 1 さ 2O 

1 ご 60 FUR エ =1 T vV ソ 

1SZO IF (KRX(T) ニ X1)※(KY(T)=Y1) THEN ドニ ドー1 に KX(T) = に X (VV) sKY(T) = に KY(VV) : BDTD 129O 
12 ヨ 0 _ NEXT 1kGB ロ TH 1 さ 20 

12 ワ 0 CURSUR 25』 SOEPRTINT "MELL』 VIETR ロ Y ! "MUSB1C"B2FBFBFBR7R" 

1300 CURSR SS2OkFRTINT SFC(1 さ ) 

1 さ 10 じ ま =ー ビ HR ま (GS じ (に) 一 1 ) +MID ま ( ビ 和 ま 。 で 。 つ ) : BUTH 1 ささ O 


作 @ OhiMZ 1983.10. 


1320 
1 さ 3O 
1 さ 40 
135O 
_ 1360 
1 さ フ O 
1 さ 30 
1390 
1400 
1410 
1420 
143O 
144O 
145O 
1460 
1470 
14 ヨ 0 
1490 
1500 
1510 
1520 
15 さ O 
154O 
155Q 
156O 
1570 
15BO 
1590 
1600 
1610 
1620 
16 さ O 
1640 
165Q 
16609 
1670 
1680 
1690 
17QO 
171O 
1720 
173O 
1740 
175O 
1760 
1770 
178B0 
1790 
18OO 
1810 
182O 
1B30 
1 ヨ 40 
185O 
1 ヨ 60 
187O 
1 ヨ ヨ 0 
189O 
1900 
1910 
1920 
1930 
1940 
195QO 
1960 
1970 
19O 
1990 
2000 
2010 
2020 
20 さ O 
2040 
205O 
2060 
2070 
2080 
2090 
2100 
2110 


IF (生ま = リリ ) キ (生生 ="") THEN 1500 

IF 人 Q=1 THEN UN 1 一 (まま ="B") BHTU 1600。1610 

FUR 1+=1 TO 5 

CURSUR X1* さ 。Y1※ ネ G+2EPRTNT " 士 " 

MUSIC"CO" 

CURSDR X1* さ 』。Y1*※ つ +2KPRTINT "ss "ENEXT 1 

IF 征 (X1。Y1) く > リ "まり THEN 1420 

ま =LEFT 生 (まつ ) +STR 和 ま (VQL (MTD ま (まさ 。 1 ) ) 1 ) 

CURSUR 17,20:PRINT "SHRRY』STQAR DESTROYED! "MUSIC"R5R" 
CURSUR 17,20:PRINT SBPC(21) 

IF 和 ま (X1。Y1) く >"B" THEN 1460 

じ ま =LEFT ま ( じ ま 。1 ) +STR ま (VQL (MID ま ( じ ま 。 つ 。 1 ) ) 一 1 ) +MTD ま (まさ 。 1 ) 
CURSR 19。20:PRINT "aH! GOD! BASE. - ." : MUSTC"RBR" 
CURSUR 19。2O:PRINT SPC(16) 

IF (CX> 日 )+(CX く 1)+(CY> 日 )+(CY く 1) THEN 14 ヨ 0 

に ま (CX。 じ ビ Y ) = じ ま : 丁 ま (X1。Y1)= ニ "EE"EBHSUB 60O0 

TF (=4)*(KE>O) THEN 15 さ O 

BT 2OBO 

CURSUR X1* さ 。Y1*2+2EPRINT BB まま 

MUSTC"BO": 征 1 和 も =T 生 (X1。Y1 ) 

IF まま ="" THEN 1 ま =" "siEURSHR TX* さ 。TY*2+2EPRINT ! リ 
CURSUR X1* さ ょ 。Y1※2+ ォ SsPRTNT 征 1 も 

IF Q=1 THEN に ビー に ビー。 1 : IF KE く XS.O ワ THEN 164O 

IF =4 THEN に E ビ = に ビー1: TF ド KE=O THEN 208O 

DN 1 一 (CS=INT (CS) ) BUTD 120O。1230 

IF =1 THEN RE=1:GHTOU 1670 

IF =4 THEN 2OBO 

CEURSOR 26,20:PFRINT "MISS FIRED! "iMUSIC"CESRR "IE BUTU 2080 
CURSUR 26。20:PRINT "COLLIDE ! "MUSIC"DSR9R "5 X1=X1 一 MX Y1=Y1MYi GHTO 1640 
CURSDR 18,20:PRINT "LANDED QT THE BASE":MUSIC"FSRR" 
CURSOR 18。20:PRINT SPCK(1) 

E= ア OOO+ (NM>5) MX5OO ロニ = さ OE FUR エ =1 TO 6:Ra(T) ニ OENEXT 
CURSUR TX* さ 。TY※2+2EPRINT 生生 (TX。TY) : TX=X1:TY=Y1:GHSUB 210O 
CURSDR TX* さ 』TYK2+2kPRTNT "E"sRETURN 

REI ト | 較 呈 昌 い QRF' 男 庫 

FRINT " 必 ":CURSHR 17 ょ 10:PRINT "MRF" 
MUSIC"C2DEFGABAGFEDC" 
CX=CX+INT(KE*MX ) : じ Y= ビ Y+INT (KE*NMY ) 

TX=FNR (日 ) : TY=FNR (日 ) : QR=1 

BDSUB 450』 BUHSUB 6905 BUTU 2OBO 

REI 還 還 較 GQLQXY MQF 還 昌 


PRTNT " 屋 "sPRINT " 0 。 な MI、 生 こ 5 61 。 ア 7 5 過 5 
PRINT " ーーー テーー ィ ーーー エ ーーー エ ーーー ャ ーーーーーーーーーーー コ " 

FOR 1=1 TQ B 

PRINT 1i" | | | | | | I 骨 

PRINT " ヒーーーーー キ ーーー トーーー ト ーー トーーー ト ーーー ト ーーー] " 

NEXT r 

CURSQR O。18 

FRINT " レレ ーー トー トー ユーーー ト ーーー ト ーーー ト ーーー ユ ーー 


FR J=1 T ロ ヨ sFR 1=1 TO 8 

CURSDR T*※4ー1 。J 光 伺 +1 

IF ((1=> ビ Xー1 )※( エ = ニ く < ビ X+1 ) ) ※( (ロニ > ビ Yー1 ) ※ ( ゴ ニ く マビ Y+1) ) THEN 18S5O 
IF LEN(C ま (1。J) )< 呈 THEN PRINT "K 衣 ※"sGHTOU 1860 

PRINT LEFT ま も ( じ ま (T エ 。J) 。 さ ) 

NEXT 1。J 

CEURSUR 16』19kPRINT "SECTUR" 

CURSR 16』2O:FRINT CX5" ニ WsEY 

BUTD 2OSO 

IF G:O THEN 590 ・ 

CURSUR 26,20:PRINT "NU TURPEDO" MUSIC"E さ R ウ R" 5BDTU 20BO 
REI 症 還 較 CHMMQND 6 較 還 較 

IF (6)=1 THEN BUSUB 99O:RETURN 


PRINT " 屋 "3EPRTNT "*※※ CHMPUTER DRTR ※※ (CUMMAND) " き 
FRINTIFRTINT 

PRINT " CENTURY "# さ 450-ーNs FRTINT TB(22)』 "1ーーMARP "IFRTNT 

FRINT " ロロ .。 SECTER "iTXis"= ニ "iTYisPFRINT TaB(22) 』 "ターーQUADRANT MAP"EPRINT 
PRINT " BB.。 SECTER "iCXs "="sEYI EPRTINT TAB(22) 5 "ミコ ーーBALRXY MAP"IPRTNT 
PRINT " ENERGY "siEs:PRINT TaB(22) "4ーーBEAM" EPRINT 

PRINT " TORPEDIS "jiBi:FRINT TAB(22) # "ロー-TURPEDD" PRINT 


FRINT " 。 KLINGBHNS "isKisPRINT TaB(22) 』 "6ー-CHMFUTER DaATA"EPRINT 
PRINT " 。 BE LINIT "iNiPRINT 

PRINT " 。 CUNDITI ロ N "i ETF QBSC( ビ まま) >48B THEN PRINT " RED"IPRINT:BDTOU 2O5O 
PRINT "GREEN" sFRINT 

FUR エ =1 TU 1OOOi BET も 

TF (生ま = リ で") 二 ( 人 =" さ ") 二 ( 介 ま ニ リ 6") THEN 人 ロニ ーR* (VaL (も) く ) BUTH 2OBO 
NEXT TIiGUSUB 650 

IF (人 Q=1)+( 人 =4)+( 各 = 呈 ) THEN IF CS>O THEN BUSUB 2110 

C0=C ロ +VQL (RIBHT ま (本 1 和 ま 。2) ) : RETURN 

RENM 還 還 較 に KLINBUN' G RTTGCF 還 呈 較 

い ソ =VaAL (LEFT ま ( じ ま 。 1 ) ) : IF ソソ =O THEN RETURN 


特集 STAR TREK 


と ん / 


FUR 1=1 TH VVi IF EKY(1T) く 1 THEN に Y(T) =1 


iPRINT 
"C2"』 ビニ ピー2 ロ *% (9-J ) : BHT 2220 


DL 


21 さ 3O IF KYX(TI) く 1 THEN 選 YKT) =1 
2140 X さ =KX( 1 ) 5: Y さ = ニ KY【(1 ) 
215O FDR J=1 TO 日 : X4=SBN (TXーX る ) 』 Y4=SGBN (TTY-Y る ) 
2160 X さ =X さ +X4』 Y さ =Y う +Y 人 4 
2170 IF 征 ま (X さ 。Y さ )="E リ THEN CURSUR X さ * さ 。Y さ ※ つ フォ ラ 
21 ヨ 0 IF (X さ =TX) *(Y さ =TY) THEN MUSIC 
2190 CURSDR X マ さ * さ 。Y さ *2 つ +2EPRTNT 征 生 (X さ 。Y う ) 
200 IF まあ (X さ 。Y3) く >"E リ THEN 2220 
221O NEXT J 
こつ CURSDR KX(T)* さ 。KY(T)*2+2EPRINT 本 (KX(T) 。KY(T)):NEXT 1 


2 っ さ O FOR 1=1 TO \V ソ 
2246 DX=TXーKX( 1) : DY=TY-ーKY(1) FX=KX(T) iPY= ニ KY (1 ) 
2250 IF (QBS(DX) く <2)*(ABB(DY) く 2) THEN 2300 
260 IF DX=O THEN PX=PX+SBN(RND( 1) 一 .5) iBTH 2310 
2270 1F DY=O THEN PY=PY+BGN(RND( 1 ) 5) i GHTO 2 さ 10 
228O0 IF BS(DX) =RBS(DY) THEN PY=PY+SBN(RND(1 ) -.5) i BUTU 2310 
2290 IF VV く 3 THEN 2 くる 10 
23OO IF QR=O _ THEN PX=PX+SBN(DX) :PY=FY+SBN(DY ) 
2 さ 1O0 IF ((PX>O) *(PX く 9) ) *((PY>O) *(PY く 9) ) THEN KX(1)= ニ PX:KY(T)=PY 
2320 TIF (TX=KX (1 ) )*(TY=KY( TI) ) THEN E=O 
2 さ 30 IF C ま く >" 0 THEN CURSUR KKX(1) * さ KKY(1) 2+ ォ 2sPRINT "K" 
2340_ NEXT 1:TX=INT(TX) :TY=INT(TY) : CURSUR TX* さ 。TY※2+ ミ 


FRINT 


wE" 


2 る 5O LTF (C ま ="")+( 征 和 ま (X さ 。Y さ ) ="*") THEN RETURN 

236O CURSUR 17,20:PRINT "TTACKED BY KLINBUNS ! ": MUSIC"D2CDCDCDR9" 
2 さ 7O_ CURSUR 17。20:sPRINT SPC(21) :RETURN 

2 さ 3BO RENM 画 証 較 GRME ロロ VER 較 証 較 

2 さ 90_ PRINT " 必 "EPRINT "※※ ポ ※ GBRME VER *※ 氷 氷 " り EPRTNT 

2400_ PRINTsPRTNT " %※※ リグ ケト ジイ タク カイ ) オ ワ リ アナ タ ハウ リフ ココ" フ 

2410 PRINT:PRINT ! K※ 氷 セイ フ 年 し テ ジリ マイ マラ 。 了 mー メ っ sc" s BHT 245O 
2420 PRINT " 居 ":FPRINT "※※* SUCCESS *%※※"EPETNT 

243O_ PRINTsPRINT | ネネ KSNi "ネフ テキ "ーー ズー テ ノ ウリ ココ フラ カイリ 

2440 PRINTsPRINT 「" *※ ネ の キュ ウロ ニー パイ ワリ で モラ レダ 。 リ " 

245O PRINT:PRINTEPRINT " TRY い aGAIN ? 

246O_ MUSIC "CE4DECDEDEFDEFBFDDCDC6" 

24 フ 7O BET 人 まま = ITF 本 ="N" THEN END 

248O IF 人 Q 和 ま ="Y" THEN PRINT" 層 ":BDTD 11O 

2490 BUT 2470 
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MZ-2000 0 2200(e-RAw irmrm) 


GPACE HIP enー セ ュー ッッ 


外 木 沙弥 侍 


ノノ 輝 kc ゅ ce 


三次 元 配列 を 使っ た ゲー ム を 作り た 〈 て 、 


考え ん た の が この ゲー ム で す 。 内 容 的 に は 「 ス 
ペー スシ ュー ティ ング 」 と た だ た いし て 変わ ら 
な い の で す が 、 立 体 的 に 作っ て ある の で 、 
ちょ っ と 違っ た 動き 方 を し ます 。 


ノ 朝 ケー ム の 明 


SPACE SHIP の ビー ム を 発射 し て 、 せ ま 
っ て くる 流星 を 破壊 する ゲー ム で す 。 し か 
し 、 普 通 の スペ ー ス シュ ー テ ィング と は 違 
い 、 流 星 に 直接 スコ ュー プ を 合わ せ て も 、 流 
星 を 破壊 する こと が で きま せん 。 こ こ は あ 
く 〈 まで 立体 的 な の で す 。 


ビー ム は 画面 の 中 央 に 向かっ て 発射 され 、 


遠く に いく ほど ビー ム の 四角 が 小さ く な っ 
て いき ます 。 流星 は 反対 に 、 画 面 の 中 央 よ 
り 出 て き て 、 近 づく に つれ だ ん だ ん 大 きく 
な っ て きま す 。 流星 の 大 きる と ビー ム の 大 
きる が 同じ で 、 重 な っ た と き に 流星 を 破壊 
する こも が で きま す 。 つま り 、 ス ミー ジ の 
位置 と 画面 の 中 央 と を 結ぶ 線上 に 流星 が あ 
り 、 か つ 大 きる が 合っ た と きのみ 、 破 壊 で 
きる の で す 。 

流星 を 破壊 し た と き の 得 点 は 、 流 星 が 遠 
計 く に ある ほど 照準 が 定め に くい の で 、 点 を 
高く し て あり ます 。 

FUEL が 0 より 少な く な る か 、SHIP が 5 
機 や られ る と 、GAME OVER で す 。 な お 、 
SHIP が や られ だ た と き は 、 画面 上 方 の 円 が 塗 


りつ ぶる れ 、FUEL が 100 減 り ま す 。 
スコ ユー プ の 移動 は 、 テ ン キ ー で 行ない ま 
す 。 

2 ニー 一 下 6 一 一 上 

4 一 一 左 8 一 一 右 
スペ ー ス バー で 、 ビ ー ム が 発射 され ます 。 


ノア 輝 フロ プラ ム に っ いて 


流星 に ビー ム が 当 だ た っ だ た か どう か は 、 配 
列 (4 X7 X4) の 中 に 仮想 画面 を 作っ て 処 
理 を し て いま す 。Y= 7 の と ころ に SHIP が 
あり 、 画 面 に スコ ュー プ を 投影 し て いま す 。 
また 、Y=7 の と き 、 ス コー プ の XX、Z 位 軒 
と 流星 の X、Z 位 置 が 同じ な ら 、SHIP が や ら 
だ と 師 が り ま すず す 。 

この プロ グラ ム は 、 フ ロー チャ ー ト を 書 
か ず に 大 ま か な あ ら す じ だ け を 考え て 、 キ 
ー ボ ー ド か ら ポ チ ポ チ と 入力 し て 作っ た た 
め 、 無 駄 な 部 分 も ある か と 思い ます 。 が 、 
ご 容赦 くだ さる い 。 


また 、 最 初 は 背景 の 星 な ど 数 多く 動か し 
て いた の で す が 、 そ こ は そ れ 、BASIC の 悲 
し る で す 。 処 理 速 度 が 遅く な りす ぎ 、 と て も 
ゲー ム と は 思え な いも の に な っ て し まい ま 


し た 。 し か だ な く 、 今 の よう な プロ グラ ム 
に な っ だ わけ で す 。 プ ログ ラム の REM 文 を 
取り 、 マ ル チ ス テー トメ ント を 使え ば 、 も 
うぅ 少し は 処理 速度 が 上 が る と 思い ます の で 、 
試し て みて 〈 だ さい 。 

な お 、 こ の プログ ラム は オー トリ ピー ト 
が か か っ て いま す 。 プ ログ ラム を 途中 で 止 
め だ た いと き は 、 フ ァ ン クシ ョ ン キ ー の 10 番 
で 、 キ ー リ ピー ト を 解除 する よう に し て 〈 
だ きい 。 


* 参 考 プ ログ ラム * 
s DINING KITCHEN 
s DONG HUNTER 
s SPACE SHIP PC-88 
s FIGHTER X1 


特集 SPACE SHIP ぢ 7 


ーー 
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に 生生 和 】 

SPRCE SHIF NMZー2O0OO 還 還 間 還 較 
9 

198B さ / 4/ 25 還 還 間 間 


「 
bu SRYQ に KO 男 還 還 較 
た っ 


CUNSULE SO0』24。C40』N』 BN TEMP 7 

PRINT " 疹 WsBRRFH T1 。 ビ 。 12。 ビ 。 エミ 。 ビ 

DEF KEY( 10) =PHKE 和 まま O95 さ 』 ま プ さ 1 

PUKE ま O0955 さ 。 Oi FURKE 47O。 まつ 1 

DINM TL し も (19) 』R ま (4。 ら 6) 。 BU も ま ( つ 。 ら ) 。NL ま (6) 。EN ま ( 1) 

DINM D1(4。 フ 7) 。D2(4。 フ ) 。D さ (4。7) 。D4(4』 フ ) 』H1(4) 。H2(4) 。H さ (2) 。H4(2) 』 ロ 1(70) 。Q2(7O0) 
GBSUB 2910 

BUSUBE 3240 

HC=O 

5 ヒビ =0』 FL=2000: SH=5: MM=O SS=O 

GUSUB さ 450 

BUSUBE 7OO 

U1 = ニ フ 2 = リコ = ニ つ 4 : 曲 さ ( 1 ) =15 つ : ミ H4( 1 ) =4 昌 = 日 ( つ ) =B: HH4( つ ) = 日 
XG ニ マミ YG ニ フミ: Z ロ =1 : XX ニオ 4+ 人 4*X 呈 = ZZ ニ 1 ロ ーZ 選 * オ 4 

FUR 1=1 TD 4 

H1( エ )= ニ INT(RND( 1 ) *128+64) :H2(T)= ニ INT(RND( 1 ) *128B+16) 
SET H1(I) 。H2(I):NEXT 

BUSUE 710』PUSITIUN U1』U2:PRTTERN-16』UN ま 3 BUSUB 700 
FR 1=1 TO 2 

PUSITIUN H ミ (1T) 。H4( 1) sPATTERN4 ょ HU ま s NEXTs BUSUB 69O 
CURSUR XX。ZZsPRINT SFP ま も 

FUR 1 エ =1 TO 45:FUR J=1 TD ア 

D1( エ 。 ゴ )=OE D2( エ 。 ゴ ) =OED さ ( エゴ) =OE D4( エ 。 ゴ ) =OENEXT J。』1 
D1(XS。』YS) = 

MUSIC IMN$ 

REN 還 還 還 還 ベク ー ト 還 還 還 

P=INT(RND( 1 ) *20) : YR=1 : RM=O 

IF P>4 THEN 62O 

BHT 126O 

UN ZR GBDSUB 111O。 1120。 11 さ O。 1140 

IF RM=1 THEN さ 60 

XR=XR+INT(RND( 1 ) * さ ) 一 1 

IF XR く 1 THEN XR=1 

IF XR>4 THEN XR=4 

ZR=ZR+INT(RND( 1 ) * さ ) 1 

IF ZR く 1 THEN ZR=1 

IF ZR>4 THEN ZR=4 

IF YR>6 THEN YR=7: BHT 22BO 

ロ N ZR GSUB 1060。 1070。 10 ヨ 0。 109O 

XP= ニ 12 フ +( XRー さ 3) * つ へ (YR 一 1 ) 

UN ZR BUSUB 1210。 1220。 12 さ 0。 1240 

PUSITIUN XP』ZPiPATTERN--2^(YRー1 ) 。 RS ま (P』 YR) 

BUSUH 1310: IF ロ M=1 THEN 273O 

BOUSUB 21903: BUSUB 1 さ 10: IF M=1 THEN 27 さ 3O 

GUSUB 1360 

IF HM=1 THEN 27 さ O 

BUSUB 2190 

PUSITIUN XP。ZPEPATTERNー つ (YR 一 1 ) 。 NL まま (YR) 

YR=YR+1 

BUTD 390 

ド に ト | 二天 思 和合 99SEI: 深 紀和: 回 『 き 昌 0REOrs 科 = 

RE ト 還 証 開 蘭 較 リュ ウド ビ : ナジ 還 還 間 較 

BUSUE 1310 

IF ロ M=1 THEN 2730 

BUSUE 1 ミ 60 

TF M=1 THEN 27 さ 0 

BUSUB 2190 

BOT 360 

REI 画 訂 間 症 ローRQM サフ " 還 間 還 較 

BRAFH 11。 ロ 12 さ RETURN 

BRAPH 12。0D12 さ :RETURN 

GRQPH 1 さ 。 12 さ 35 RETURN 

REN 証 本 本 間 1O フサ ブフ" 

CURSOR _O』 さ FRINT TAB( さ アーLEN(TR* ま (HC) ) ) i HC RETURN 
CURSDR OsBsFRTNT TQEB( さ アーLENSTR ま (SC) 〉 ) i SF: RETURN 


CURSUR 3 さ 0』1 さ :PRINT" "sCURSHR 0O』 1 さ =PRINT TAB( さ 7ーLEN(STR ま (FL ) ) ) sFLs RET 


REIN 証 還 還 較 カー カキ" 症 還 症 間 較 

FOR T=O T ロ 2OO:NEXTsRETURN 

FUR 1=O TUD 6QOONEXTIRETURN 

FUR 1=O TU 1QOOkNEXTsRETURN 

に コッ 較 = 議 Pcm 因 = = | 

RR=INT(RND( 1 ) *9) : RETURN 

RENM 還 還 還 間 4* 日 ホホ に ニョ ー) 半 還 還 還 較 

GBSUB 10: AX=RR: GHSUE 10*: QY=ー-RR: RETURN 
BUSUE B10:QX=-RR: BUSUE B10sQY=RRi RETURN 
REI 症 還 還 症 昌 4 日 ホシ ゴト "つつ 還 還 還 昌 

FOUR RI=1 TD 2 

FPSITIUN H さ (RTI) 。H4(RTI) :FRTTERN 一 4 。 NL ま ( さ ) 
ロ N RI GSUB 40。 5Q 

H さ (RI ) =H さ (RT )+AXEH4(RT)=H4(RT)+aY 

IF (HS(RTI)X64)+(HS(RI)>18BB)+(H4(RT) ミ 16)+(H4(RT)>140) THEN H さ (RI1)=12BIH4(RTI) 


PUSITIDN HS(RI) 。H4(RTI ) :FATTERN-4 。HD$ 
NEXT: RETURN 
REN 回 還 症 還 較 SGHIF ハイレ" リ 還 還 還 半 
D1 (XS。YS) =Os RETURN 
D2(XS。YS) =O RETURN 
D さ (XS YS) =O: RETURN 
D4(XS。YS) =O RETURN 
REIN 還 還 還 還 SHIF ) イ し '!) 還 還 還 較 
D1(XS』YS) =9: RETURN 
D2(XS,YS) =9:RETURN 
D さ (XS。 YS) =9: RETURN 
D4(XS、YS) =9: RETURN 
REN 回 還 症 議 較 リュ つ セ ゴ リリ イレ し " り 還 還 還 較 
D1 (XR。YR)=1:RETURN 
D2(XR。YR) =1:RETURN 
D さ (XR。 YR ) =1:RETURN 
D4(XR。YR)=1:RETURN 
REN 還 還 還 較 リュ の し") 還 還 還 還 較 
D1(XR。YR-1 ) =OiRETURN 
D2(XR,YR-1 ) =Q: RETURN 
D さ (XR YR-1 ) =O RETURN 
D4(XR』YR-1 ) =O: RETURN 
REN 男 還 還 間 ら HTF ホ " コー 還 還 還 凍 還 
ZEB= ヨ O+2^(YBー1 ) : RETURN 
ZB=BO:s RETURN 
ZB= ヨ O-2^(YBー1 ) :RETURN 
ZB=BO-2^YB: RETURN 
REN 王 還 還 較 間 リュ つ ド ホホ < ニ コー 還 還 還 還 還 
ZF=BO+2 つ “(YR-1 ) : RETURN 
ァ ZP=B ヨ oO: RETURN 
ZFP=BO-2^(YR-1 ) : RETURN 
ZP=B0-2 つ “YR RETURN 
REN 画題 間 リュ つ セ ゴイ コキ リハ ゴ し リリ 還 還 還 還 
XR=INT(RND( 1 ) 4 ) + 1 
ZR=INT(RND( 1 ) *4)+1 


ロ N ZR GOSUBE 1060。 1070。 10 ヨ O。 1099 
BUT0 49Q 

FRE ト 還 還 還 間 ご 4。 ら 6, 日 キー 還 還 還 是 較 

BET の を も 


IF (人 も =" つ リ )+( 仙 ま = リ 4 リ ) キ (人 和 ま = リ 6 リ )+( 介 ま ="B") THEN =VQL(R ま も) /2EHN R BDSUB 155O。 1 
175Q。 1 ヨ 5O 

IF FLXO _ THEN DM=1 

RETURN 

RE ト 1 還 還 間 是 昌 ハデ ー ミ キー 画題 還 隊 

BET B$ 

IF B ま > リリ THEN_ RETURN 

YB=6: FL=FL-ー5Q: GHSUH 75O 

MUSIC "ーー 人 AO XB ニ 12 フォ +(Xー ミ 3) 2 の (YBー1) 


ロ N ZS GSUB 116Q。 1170。 11 ヨ 0。 1190 

LINE XB』ZB。XEB+2“(YBEBー1 ) 一 1 。ZBE。XB+2T(YBー1) 一 1 。ZB+T2T(YBー1) 一 1 。XB。ZB+TST(YB-1) 一 1』X 
ON ZS GUTD 195Q。 1970。 1990。 EQO1O 

YB=YBー1 

IF YE:=1 THEN 1 さ 90 

YB=6 

MUSIC "ーAQ" 


X 昌 = 1 フォ +(XGー ミ ) *% で (YY 昌一 1 ) 
UN ZS BOSUE 116Q。 117O。 118BO。 1190 
BLINE XB。ZB。XB+2“"(YBー1 ) 一 1 。 ZBH。XB+2“(YBー1 ) 一 1 。ZB+2^(YBー1 ) 一 1 。 XBH。 7H+2^(YBー1 ) 一 1。 い 


YB=YBEー-1 
IF YEB>=1 THEN 146O 
IF FL ミ SO THEN DM=1 
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15 さ Q 
1540 
155 
156O 
1579 
15Bo 
159O 
1 ら 60O 
1619 
1620 
16 さ O 
1640 
1650 
1660 
167O 
168Q 
1690 
170Q 
17109 
172O 
17 さ 0 
1740 
1750 
176O 
1 フ 77 
178O 
179O 
1BQOO 
1810 
182O 
1 ヨミ さ Q 
1840 
1 ヨ 5Q 
186O 
17Q 
188O 
1 ヨ 9O 
190O 
19109 
1920 
1930 
1940 
195O 
196Q 
1970 
198BO 
199Q 
2000 
SO10 
2020 
2O さ Q 
2049 
205O 
2060 
207O 
2O ヨ Q 
2090 
2100 
XB。ZBE 
2110 
2120 
21 さ O 
21409 
215O 
2160 
タ 40) 
21 ヨ 0 
2190 
2200 
2210 


222O 


22 さ 0 
2240 
225O 
2260 
2270 
228O 
2290 
2 さ OO 
2 さ 10 
2 さ 20 
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RE TURN 

RE ト 計 還 較 還 間 ご キー 部 間 是 隊 間 

IF Z ロ =1 THEN RETURN 

FL=FL-10』BHSUB 75ORHN ZS-1 BUSUE 97O。 980。 990 
ZS=Zー 1 

ロ N ZS BODSUBE 1O1O。 102O。 103Q 

BSUE アタ 10IFHSITIHN U1』U2sFRTTERN 一 16。NL ま ( 王 ) 

U2= リ ロジ ー4 5 FUBSITI ロ N U1。USEFRTTERN 一 1 ら 6。UN ま * BHSUE 69Q 
CURSUR XX。ZZkFRTINT GL ま 

ZZ=ZZ+4ECURSHR XX』ZZEFRINT 5F ま 

RETURN 

RE 回 還 還 較 4 キー 間 還 間 

IF X=1 THEN RETURN 

FL=FL-108 BOBSUB 75OEUN ZS BUSUB ワウ 60。 970。 9BO。 990) 
X=Xー1 

DN ZS BODSUBE 1010。 102QO。 10 さ O。 104Q 

GUSUB 7Z10sFHSITIUN U1』U2 FRTTERN 一 16 ょ NL ま ( 王 ) 
U1=U1+4:FUSTTIUN U1。USEFRTTERN 一 16。UN ま s BUSUB 69O 
CURSUR XX。』ZZkFRINT SL$ 

XX= ニ XXー4: CURSHR XX。ZZkPRINT SF ま 

RETURN 

REN 王 還 間 還 の キー 還 間 間 還 較 

IF XS=4 THEN RETURN 

FL=FL-10』BDSUE 75OEHN ZS BUSUE 960O。 70。 98O。 990 
XG=X+ 1 

DN ZS BSUE 1O10。 1O2BO。 10 さ O。 104O 

BUSUE ア 10sFUSITIUN U1。USEFRTTERN 一 16 ょ NL ま ( 王 ) 
U1=U1-4:FHSITIHN U1。USEFRTTERN 一 16。UN ま : BUSUE 690 
CURSUR XX。ZZkFRINT GL$ 

XX= ニ XX+4』iCURSUR XX。ZZEFRINT SF も 

FRETURN 

RE ト | 還 較 間 較 間 B キー 問題 昌 還 較 

IF ZS=4 THEN RETURN 

FL= ニ FL 一 1Os BUSUB 75Os UN ZS BUSUE ツウ 6O。 76。 9O 
Z=Z+ 1 

UN ZS-1 BDSUE 1QGO。 10 ミ O。 104O 

GUSUB Z109sFUSITIUN U1 USEFRTTERN 一 1 ら 、NL ま ( 王 ) 
US=U+4:FHSITTIHN U1 USEFRTTERN 一 16。UN ま : BUSUE 69 
CURSOUR XX。ZZkFRINT GL ま も 

ZZ=ZZ-4: CURSUR XX。ZZEFRINT SF ま 

RETURN 

RE ト 還 還 還 還 間 に "ーー/ ウリ コロ 症 還 還 還 当 

IF D1(XS。YE)=1 THEN EQO49 

BODTD 14 さ GO 

IF D2(XS。YE)=1 THEN 2Q4O 

BOT0 14 ミ 6 

IF D ミ (XS』YB)=1 THEN SO4O 

BUTO 143O 

IF D4(XS。YB)=1 THEN 2Q4Q 

BOT0U 143Q 

に コ u 較 = 回 PuchMzAW 明 | 

BUSUB 690: MUSIC "D1D 栖 匠 CD2" 

FUR 1IE=1 TO 2sFDSITIDN XE。ZE:FRTTERN 一 “(YE ビー1 ) 。 BU ま * T 日 。YB) : BDSUE 7 プ ウ ONEXT 
Y ビ =YB: YB= ム 6 

MUSIC "ーーaO" 

X 昌 = 1 つ フ ォ ( XGー ミ ) まま (YY ヨー1 ) 

UN ZS BOSUE 1160。 1170。 118O。 1190 

BLINE XB。ZB。XB+2“-(YHー1 ) 一 1 。ZH。 X ロ + つ (YEBー1 ) 一 1 。ZH+2“(YHー1 ) 一 1 。 XH。 ZH+2 つ ^(YBー1 ) 1 。 


YB=YBー-1 

IF YB:=YC THEN 2O7O 

FUSITIUN XE。ZEB:FATTERN-2 つ “(YE) 。NL ま (Y ビ ) 
GC=SC+ (フーYC) *5Q GHSUB 740 

FL=FL+( フ 7 フーYC) *5O GBDSUE 75O 

IF _ SC:HC THEN HC=SC GUSUB フミ Q 
RM=1 : RETURN 

RE 還 還 間 間 間 +-, ホ :, 還 症 間 量 

BUSUE 70Q 

FUR 1=1 TO 4:iRESET H1(1) 。H2(1) 

H1( 1) =H1(IT)+INT(RND( 1 ) * マ ー1 ) *4 

IF (H1(1) ぶ 64)+(H1(T) ジ 191) THEN H1(1I)=128 
H2( 1 ) =H2( エ )+INT(RND( 1 ) * ミ ー1 ) *4 

IF (H2(T)E16)+(H2(T)S 14 さ ) THEN H2( 1) =BO 
SET H1(1I) 。H2(1I) 

NEXT: BUSUB BBO: BDSUE 69ORETURN 

REN 還 還 症 較 リュ の セコ ヨコ トリ ] ロ 症 還 還 還 較 

DN ZR BDSUB 2 さ 40。 ご さら 6O。 2 さ 3BO。 240O 
IF SG=1 THEN 24 さ Q 

FL=FL--20』 BUSUBE 75O 

IF FLEO THEN 2 フミ さ Q 

BOT0 ミ さ 6Q 


2 ささ O 
2 さ 40 
2 さ 5O 
2 さ 60 
2 さ 70 
2 さ BO 
2 さ 90 
2400 
24109 
2420 
2430 
2440 
2345O 
2460 
247O 
248O 
249O 
250O 
2510 
2520 
253 さ 0 
2540 
255O 
2560 
257O 
258O 
2590 
2600 
2610 
2620 
26 さ 0 
2640 
265O 
2660 
る 267O 
26 ヨ 0 
2690 
2700 
2710 
2720 
273O 
2740 
2750 
2 フ 60 
2770 
270 
2790 
2 ヨ 00 
2B1O 
2820 


Ok GnT ロ 


2B3O 
2 ヨ 40 
2B50 
2 ヨ 609 
2B7O 
288O 
290 
2900 
2910 
292O 
29 さ O 
2940 
295 
2960 
2970 
298O 
299Q 
3QOOO 
さ 010 
さ Q2O 
さ Q さ 0 
さ O40 
さ QOS5O 
さ O60 
3070 
さ OBO 
さ Q9O 
さ 100 
る 110 
さ 120 


REN 画 還 還 還 間 ジョ ウト リツ コ ご 問題 還 本 還 
IF D1(XR。YR)=9 THEN 5=1 


RETURN 

IF D2(XR,』YR)=9 THEN 5S5=1 

RETURN 

IF D さ (XR。YR)=9 THEN 55=1 

RETURN 

IF _D4(XR。YR) = THEN SS=1 

RETURN 

REN 還 還 還 較 間 リュ の セイ ジョ ウト ' り 回 還 較 

CURS ロ RB。2EFRINT " | 。 bu 8 
CURSDRB, さ :FRINT " ーー: 


CURS ロ R ヨ 。4:FRINT " 還 還 還 昌 還 還 昌 還 還 " 

CURSDRB。: FRINT " 還 還 間 還 昌 間 間 

FURSURB。 ら : FRTNT 「" 還 還 間 間 間 昌 昌 昌 昌 昌 " 

CURSDRB。7: FRINT '' 還 還 較 還 間 昌 間 間 間 還 間 還 

CURSOR。 日 : FR INT 「 還 還 還 間 間 間 

FURSDRB 。 ワ : FR TNT 「 問 還 還 還 間 昌 昌 昌 昌 

CURS ロ R 日 。 10: FRTNT 「 加 還 還 間 間 間 間 間 間 間 " 

FURSDRB。 1 1 : FR INT 「 還 間 間 昌 昌 間 5' 

CURSDR。 12:FRINT 「' 還 還 間 昌 間 間 昌 間 昌 " 

CURSDRB。 1 さ : FR TINT 「' 還 還 間 間 昌明" 

CURS ロ RB 。 1 4: FRINT' 還 還 還 還 間 間 昌 

CURSDRB。15:FRTNT" 還 還 還 昌 間 昌 了 

CURS ロ R、16*FRINT" に ニー テー 

FURSDRB。 17:FRINT" 豆 訂 連 』 

BDSUB フ 77OzFDR LE=1 TD さ :CDNSDLE R:MUSIC "ーF2R1-F2R1-F2" = BDSUB 79O 

CONS ロ LE N:IMUSIC "ーF2R1-F2R1-F2" 

BDSUE 79O 

NEXT LE 

FL=FL-100: BUSUE 750 

FUR JZ=2 TO 17 

CURSDR B,JZ:PRINT " n 

NEXT JZ 

IF FLO THEN 2 フ さ O 

SH=SH- 1 

FUSITION 74+16*(5-SH) 、2 FATTERN-12、EN$( 1 ) 

IF SH=O THEN 27 ミ Q 

SS8=Oi CURSDR XX、ZZEFRINT SF$:BDT ミコ 60 

FREI 還 蘭 蘭 7"ー ム ゴー))" - 還 還 間 半 

FOR 1=1 T ロ 2o 

X ロ =INT(RND( 1 ) *12B+64 ) 

YD=INT(RND( 1) *12B+16) 

LINE 12B,B0,X ロ xY ロ 

MUSIC "-D2" 

NEXT: GHSUB 790:BHSUE 79Q 

CURSDR 6.5:FRINT "BsAUsMTLsET っ DsVhsESR" 

CURSOR 25、5:FRINT "RsEnsFDsLT や ADeYDs UsYU ち /DpND "FMUBTC "ーD5"s BUSUB 790 

BET 人 $ 

TF Q ま ="" THEN CURSOR 25。:FRINT " ns D ゃ De Ds De De ちや De De De "EBDSUE 7 
2Boo 

IF 人 Q$="Y" THEN 190 

ITF ="N" THEN 2B6O 

CURSDR 25.5:FRINT " ns ns me Ds sa ha Up Ua ル ち Do "BUSUB 77QOBUTD 2BOO 

FUEE *$Q95 ミ 、* ま フ マ 

FDKE ま 4570。 ま 19 

FRINT " 宅 ":GBRAFH T1、C。TS、 ビ 、 1 ミュ 、C ュ 12 マ 


END 

コッ 較 = = 癌 gi | 

FREIN 

TL しま ( 〇 )=" ーー ドーー ル ーー ロー つつ ーー 
TL ま ( 1 ) =" PT だ mh トー 還 
TL まま (2 つ ) =" es ET MI MM 還 下 
T し ま ( さ ) =" PP ニー の 
TL まま (4)=" ーー トド ーー ピエ たつ (に は 
T し ま ( 王 ) 三 リ レーー ニ ーー し J 上 コ に し レレ ーーーー7 トーー ニ ーー つつ LU 
TL まま (6)=" 
TL ま ( フ ) =" に だ PO CSIE デ ーー) 
T し ま ( 日 ) =" FI 1 全局 T コ 1 
TL ま (9) =" 5 信人 由 IP MI 
TL ま ( 10)= リ " PLPRG ル だ で ル 1 1 の デ | 人 
TL$( 11)=" SH Be 所 
に 天 ( 112) を レレ ーー に し ドレ ーーーー) に 9 し 
TL も ( 13)=" 6 
TL ま (14)=" ロー ロ ェ ーー ーーー コ ーー ーー ゴイ デー " 
TL を ま (1 き )=" 1 ビブ コト ーー さり トマ デ 
TL まだ 416 る)" Fmrl ピー コ ョ ーー ョ II ME WU MM 
TL まあ ( 1 フ )=" 1 目 | FT ws ミー 直上 上 省 人 中 MI 
TL ま (1B)=" 11 11 ビー ュ ーー ーー た の だ ーー "W 
T し ま ( 19) =" し コ し ーーーー| に ーーーー リ レレ ーーーー| レレ ーーーー) LU 


FUR J=37 TO 1 STEF -1:FHR 1=O TH 19 STEFP 2 
特集 SPACE SHIP 5 ぢ 


さき 13O 
さ 14O 
さ 15O 
さ 160 
さ 170 
さ 18O 
き 190 
さき 200 
さ 210 
さ 220 
さき 2 さ O 
さ 24O 
さ 25O 
さ 260 
さ 270 
さ 20 
3290 
さ 3Q00 
ささ 10 
さき 20 
ささ 3O 
ささ 4O 


5O ]/* 


さ 35O 

ER/ 

- さ 360 
ささ 7O 


CURSUR 0O。 エ + ミ :PRINT MID ま (し ま ( エ ) 。 本 。 1 ) 5 "や " ュ ビ HR ま (日 ) 
CURSUR さ B』 エ +4:FRINT MID ま ( 丁 し ま ( エ +1 ) 。 ミ 日 JJ。1) * 
CURSUR ゴ +1。 エ +4sFRINT CHR ま ( プ ) 

NEXTiMUSTC "-ーDO"sNEXT 


CURS ロ R 10。OsPRINT 
BUDSUE 417O 
CURSUR 10。OiPRINT 
BET ^$ 
IF 人 Q ま =" !" THEN RETURN 
CURSDR 10。OiPRINT " 
FEI ト 還 還 還 間 キー ビリ 還 還 昌 間 較 
PRINT " 愉 り 
CURSDR 7』OsFRINT 
CURS ロ R 2。1:FRINT 
CURSDR 10。 さ :PRINT 
CURSQR 11。4sFRINT "| 
CURSDR 11.5iFRINT "N\/ 
CURSOR 5。6FPRINT "ーーーーーーーーーー コ 
CURSDR 5』7:FPRINT "中 ズ 0 や ーー ミ ーー 
CURSOR 5。 昌 FRINT "ーーーーーーーーーーー" 
PRINTEPRINT STRINB ま ("リュ 40) 
人 =" * 3 スズ コー フ ” ラー イト“" ウ スル ト 
ミ リュウ セイ カカ " ト オ リ スギ" 上 ルト [ーー “ご の 
谷内 生 キリ" ま ョ リュウ セイ ラブ リリ カイ ズル ト 


"EE Mait a moment ! ]" 


NE 0 っ ーー ララ 大 季 ! OSNUSTE リーD5PsGpSBlUB アア 70 


"sBDSUBE 770Os BUTD さ 19O 


| 
"| 日 | つ エ リサ や ちち ちゃ イブ" 
リヒ "ー ム DPP 
ヒダ タリ | 4 トー キー| 61 ミ ギリ 


レー | 


E F4 に し s ヒ ドー ム ラ ハッ シャ スルト E の デ 
ー20. コツ 


[ +5O ~ 3OO ]/# 


ー1O デ コメ \* 


sFUEL カ " 0O ヨリ ズ 2 ナ イト BaME V 


FUR 1!=1 TO LEN(R$) 


B*=MTD ま (人 Q 和 ま 。T。1) iTF B ま く > リ /" THEN PRINT B ま iDUTS22 フ 5 HUTD227。4: MUSIC "ROW"IGB 


ロ T0 3 さ 390 


ささ 8O 
ささ 90 
さ 40O 
さ 410 


PRINTIPRINT TAB(3) si MUSIC "ーD5" 
NEXT 

CURSDR 10』21:PRINT 
SET の 

IF 仙 ま =" " THEN RETURN 

CURSDR 10』21:PRINT " 

REN 還 還 還 還 間 SHIF "メー 症 還 間 症 半 

PRINT " 富 "gBRQPH 11』 じ ビュ 12。 ビ 。 エ さ 。 Cs BUSUB 710 
LINE ら 61 』14。192。14。192。144。61。144。61。14 
LINE BZ ア 。160。45』160。 45。O。 20B。O。 20 日 。 160』169。16O 

LINE 55。0』61 。14。45。2 さ 

LINE 200』0。192。 14。20 日 。 2 つく 

LINE 20 昌 』1 さ 7』 192。144。200。160 

LINE 45。 137。61 。 144.55。 160 

LINE 45』 160』 さ 4 1, さ 4 。 199 

LINE 208。 160。222。 18B。 つつ 2。 199 

LINE 48。 185。 4 日 。 1 7 日 。5 つ 』。169 ェ 61 。 16 弓 。 フ さ 。 1 6 コブ 6。 170。 76。』 1 7 日 。 72 。 1 フロ 品 。 4 日 。 1 ヨ 5 555。 172 


"ELE スパーズ ハリ "ーー ラオ シテ ! ]"sMUSIC "ーーDS"sGDSUB 77O 


"s BUSUB 77O: BUTD さ 400 


s ら 1。170。 プ 1 。170。 フ マス 。 1 フ 72 フミ 。 178。 ア 1 。 1 ヨ 5 


さ 55O 
さ 560 
さ 57O 
さ 5 ヨ 0 
3 さ 590 
さ 600 


LINE 
LINE 
LINE 
LINE 
LINE 
LINE 


52』169。55。 172 
ら 1 16 ら 61 。170 
7 る 3』 165。71 。 170 
76。 1 70。 7 さ 。 172 
76』 17B。 7 さ 。 178 
208。 1 85 20B』 17B』204 』169。195。 165。 182 165。』 1BO』 170。 180。 17B。 1B4。 1B5。 208。 1 


5 201 , 172。 195。 1 フ 70。 1 ヨ 4。 170。 1 ヨ 2。 172。 1 ヨ 2。 1 7 日 。 14 15 


さ 61O 
さ 620 
さら 6 さ O 
さ 640 
さ 65O 


381O 


LINE 204。169』201 』172 

LINE 19 紀 。 16 呈 。 19 紀 。 170 

LINE 182。165。 184。17O 

LINE 180。170。 1 ヨ 2』172 

LINE 18O。』 178』 182。178 

LINE 0 1 ヨ 0。 1 

LINE 176。 18BB』306。』 18B。 さ 06。 199 

LINE さ 06。 1 日 。 さ 19。 1 フ 5, 2 さら 。 1 フ 5 

LINE くさ 5。 0。 さ 2 フェ 21 。 175。 さ 4 。 1 

LINE 221。0,224』 フ 。 2 くさ 。 1 フ 5。 222。 1 日 

LINE O』 フ 。 さ 2。 フ 

X= さ 1sY=15sFOUR 1I=O TO 1O 

LINE O』Y+ エ ま 16。Xー エ 。Y+ エ ま 16 

NEXT 

LINE 2 さ 9。』。17 フ 7。 さ 09。17 フ 7 。 さ 0O9。1 79。 さ 02。 1B6 

LINE 2 く 32。 1 ヨ 4 。 さ 02。 1 日 4 。 さ 02 。 1 日 6 。 2 さ 2 。 1 日 6 232 。 14 
X=2323Y=1B4sFUR 1=O TO 10 

LINE X+ 了 ※ ネ ブフ 。Y。X 二 エエ 衣 フ ォ ア 。Yー プ 

NEXT - * 
LINE 24 さ 。166。241 』。164』240。1 さ 4 。2 つ 42 。129。 さ O9。129。 さ 1 1 。1 さ 1 。 さ 12。16 ら 1 。 さ 1O。166。 24 さ 。 1 


LTNE 2 くさ 9。 昌 9。 さ O6。 9。 さ 1 1 。94。 さ 1 さ 。 1 14。 う 1 マ さ 。1 19。244。1 19。 つ う 9。 1 14。2 さ 7。94 。 239。 昌 9。 24 


1 7 308。 日 7 。 う 1 さ 。 92。 さ 1 さ 。114 


さ B2O 
さ 3O 
さ 3840 


LINE 306。89。 さ OB 日 ア 
LINE 311。94。 る 1 さる 。92 
LTNE 2 さ 7。49。 さ 04 。 49。 さ 0O9』54 。 さ 1 さ 』 ブフ 4 。 さ 1 1 。 ワウ 。 つ 44 。 フワ ェ うり 。 7 フ 4 。 2 つ さ 5。 4 。 つ さ フ 。 49。 241 』。 45 


5 さ O 日 。 45。 さ 1 さ 。 50。 さ 1 さ 。74 
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さ B5O LINE 3O4』49。 さ OB 。 45 

さき 6O LINE さ O9』554。 さ 1 さ 。5O 

さ B7O LINE 2 さ 4 ょ 9 ょ うさ O1 。 ワ ょ 。 さ O6』14。 さ 1 1 。 さ オ 。 さ 0 ワ 。 さ ワ ュ コ オ つ ュ さ ワ ュ コマ フュ 4 。 ご さ で 14 ご さ 4 。 ワ 。 つ さり 。 4。 さ O6 
4 。 さ 11 ょ 9。 さ 11。 さ 人 4 

さ BBO LINE 3O1。9。 さ 06。4 

さ ヨ 99 LINE 306』14 ょ る 11。9 

3 の 00 LINE BO』199。,80』1B6。』B1 179』 BB 155』96』 147。 160。 147。16 昌 。 155』 175』 179。 176』 186』 17 


3910 LINE B5。 199。8B5。 190。B6。 18 フ ェ 94 』16 さ 。100』15 ア 。15 ら 』。155 ア 7。16 つ 』。16 さ 。』170。1B7』171 。 190。 1 


さる 92O LINE 96。14 フ 。1OO』 1 王 フ 

さ 9 さ 0 LINE 日 』 15』 4 。 16 さ 

さ 940 LINE 16O』147。15 ら 6。 15 フ 

さ 950 LINE 16 日 。 155。 162 つ 16 さ 

さ 960 LINE BB1 17 フワ 。B6』187。 17O。187。 175。 179 

さ 970 LINE 0。 1 ヨロ 6。 昌 6』 190』171 。190。 17 ら 6。 16 

さ 9BO LINE 8B5』19 さ 。171 』19 さ 

さ 990 LINE 196』171』196 

4O000 LINE B5。 199 ェ 。 171 。199 

401O PHSITIDN 90』2sFATTERN-12。EN 和 まま (Q) +EN 和 も (Q) +EN ま ( 〇 ) 

4020 _ PATTERN-12。EN ま ( 〇 ) +EN ま ( 〇 ) 

40 さ O_ CURSDR さ O』2IFRTINT "HI-SEURE" 

4040 BUSUB 7 フミ 

405O CURSDR さ 1。7:FRINT "SCURE" 

4060 GUSUB 740 

4O70 CURSDR さ 2』12iFRINT "FUEL" 

4Q0 ヨ O_ GUHSUB 75QO 

409O CURSDR さ 1。17sFRINT "Ba" 

人 4100 PHSITIUN 256。144:PATTERN 一 16。 SQ 和 ま +Y ロ 生 + に 人 も 

4110 CURSUR 1 さ 。2OIFRINT "SFACED や ちゃ 5H TFPUD や ちや や や や マー2OO00" 

人 4120 FOR 1=1 TO 7Q 

41 る O 1(I)=INT(RND( 1)*12B+64) 3: DS(T)= ニ INT(RND( 1 ) *12B+16) 

4140 BET Q1(I)。Q2(I):NEXT 

415O_ RETURN 

416O REN 還 還 症 隊 較 !\)" ウー-, エー ケー 還 証 還 症 較 

4170 SF も ="F  ]U や ちち ちら ロロ DU ち ちち つつ U や ちち トー JsG し まま ー" や ちや や や ちや らち 

全 1 昌 0 EN ま も (O) =CHR ま も ( 〇 ) +CHR 生 ( プ ) +CHR ま (24)+"! 。 309  "+CHR ま (2 人 4) +CHR ま ( フ ) +CHR 和 $ ま (O)+CHR ま (O) 
+ リ ダー "+EHR ま ( 16) + じ HR ま ( 16) + ビ HR ま ( 16) 二 ! 。 リト CHR ま (O) 

4190 EN ま も ( 1 ) =CHR ま ( 〇 ) +CHR ま (ププ) +" 楽 で で すす 1 で で 革 リ キビ HR ま ( プ ) +CHR 和 ま (O) +CHR 和 ま (O) + "05s 略 ウ "+ ビ HR 
ま (O) 

4200 HU ま = リ "ーーー ドー" 

4210 UN ま =CHR ま ( 〇 ) +CHR ま ( 〇 ) + "人 せ ち リキ CHR ま (9) 二 " 人 せ 国 "リキ CHR ま ( 1 1 ) + 上 CHR 和 まま (9) +CHR 和 ま ( 17) 上 "RM 人 エビ リ ォ キビ 
HR ま ( フ ) +CHR ま (9) +CHR ま (4 ) + "EE う "+ ォ CHR 和 (16) +" 間 子 E 旨 HH 日 や " 

422O SQ も = じ HR ま (O)+ す "リキ CEHR ま (16) +CHR ま (日 ) + キ 上 HR ま も (O) すん "+CHR ま (で 1) す "回 "+ キ CHR 和 ま ( 10) + ビ HR ま (日 
) +CHR$ ま (日 )+"PO"+CHR 生 (16) + じ CHR ま (19) 

42 さ O SA ま =SQ ま +CHR ま (O) す " 。 T 四 リリ + キ CHR ま も ( さ 4) + "1 まま Mh"+ キ CHR ま (日 ) 上 CHR ま (16) "上 " 

4240 YA も =CHR ま (O) すっ 人 せ せ " キ CHR ま ( そ 4) 二 "の 1 て 日 信 や 国 "+CHR ま (日 ) "日 "+CHR ま も (O)+" 39mー"+CHR ま (1 
6)+"TTR 員 学 "+CHR ま も ( 17) +CHR ま (16) キリ ロリ 

4250 KQ ま =CHR ま ( 〇 ) + "や ちり"+CHR ま (日 ) 上 CHR ま ( 1 1 ) + じ HR ま ( 16) +CHR ま (16)+ "7OPP "+ ビ HR ま (19) + ビ HR ま ( 1 
ら 6) +CHR ま ( 16) +CHR ま (で さ ) +CHR ま (16) 

42 つ 6O に KR まま = に 内 ま +CHR ま (OO) +" 罰  T"+CHR ま (O)+" 。 胃 。 T"+EHR ま (O) 

42 フ 7O NL ま ( 1 ) =CHR ま (O) 

428O NL まま ( つ )= ビ HR ま ( 〇 O) + じ CHR ま ( 〇 ) 

4290 NL ま ( マ る ) =STRTING ま (CHR ま (OO) 。 人 4) 

43 さ OO_NL ま (4)= ニ STRING ま (CHR ま (O) 。 日 ) 

4 る 10 NL$( 弓 ) =STRING ま $(CHR$(O) 。 さ 2) 

4 さ 20 NL も (6)=STRING ま (CHR ま (O) 。 12 日 ) 

4 ささ 3O BU ま ( 1。1)= リ "居り 

4 さ 40 BU も (1』2)="a ヨ " 

4 る 5O BU も (1 ょ さ )=" コ 1D ト に" 

4 さ 6O BU まま ( 1 。4) ="\Ns ヲ ん \b ト " 

4 さ 7O BU ま ( 1 。 王 ) =CHR ま (2 つ 4) す " 1 人 せり リキ CHR 生 ( 16) + す "日 @ て まま HH "キビ HR ま ( 16) + じ CHR ま (19) 二 り ュ 19 生け げ 

4 さる O BU ま ( 1 。 王 ) =BU* も ( 1 。 王 ) +CHR ま も ( 1 プ ) + "ネリ キビ HR ま (12) + す "4 ネリ "キビ HR 和 (10) +CHR も ( 1 日 ) +CHR 和 も (20)+ リ "1 
話 "+CHR も (17) +CHR ま (9) +EHR ま ( さ 4 ) + す "ワリ + ォ ビ HR ま (日 ) 

4 さ 90 BU も ( 1 。6) = ヒ HR 和 まま ( O) + "0 人 せ "+CHR ま も ( 16) + じ HK まま ( 日) + "や 揚 BAR "+CHR$ 和 (日 ) CHR 和 も ( 16) +CHR ま (16) + 
"11D"+CHR ま ( 16) +CHR ま も (16) +CHR ま (日 ) "1 ABE&"+CHR ま (日 ) 

4400 BU ま も ( 1 。6) =BU$( 1 。6) +CHR ま ( 16)+ す "まじ ID り "+CHR ま も ( 14) +CHR ま ( 17) +CHR ま も (O) + "ルリ 0"+CHR ま (1 
2 つ ) すう 99 る 昌和 "+ じ HR ま (日 ) "OO ト ほ "キビ HR 和 まま (O) + じ HR ま ( さ 4) 

4410 BU まま (1 6) =BLU 和 も ( 1 。 ら ) +CHR も (2 日 ) "る ⑳ 全 1 TBD"+CHR 和 まま (O) + "リキ ビ F'S 事 (12) + じ HR 和 まま ( 16) " 蘭 人 せ 
や ちゃ や や 信人 せ 叶 キキ O ひ "キビ HR ま (1 つ ) す "CI "リキ CHR ま (O) + "和束 P や じ 上 せり まり キ ビ HR ま (日 ) 

4420 BU まま ( 1 。6) =BU ま も ( 1 。 ら ) +CHR 生 ( 16) +" ロ BE 人 て"+CHR 和 ( 16) +CHR 和 (日 ) キ C 上 HR ま も (日 ) "4 ロ ACH "+CHR ま (日 
) +CHR ま (日 ) + 上 HR ま ( 16) +" や 人 條 B ト "+EHR ま (16) + じ HR ま (日 ) "9 上 1 "+EHR ま (O) 

44 さ O BU も (2。1)= リ "ウリ 

4440 BU ま ( つ 4』2)= 
4450 BU ま (2 ょ うる) =" す "+ ォ CHR ま (1 日 )+ "る " 

4460 BLU ま ( つ 。4)=" ト BE"+CHR ま (16) す "1 リキ CHR 和 も ( 日 ) "BB 半 " 

4470 BU ま (2。 呈 ) =" ま ロ EMMD"+CHR ま (16) "トリ +CHR 生 (O) + す "エリ + ビ HR 生 (O)+" HFH"+CHR ま (16) +" 男 ) 人 全国 
翌 上 還 " キ CHR ま ( 16) +CHR 和 まま (O) す "は リ キビ HR 和 ま ( 16)+ す "て FT 

44 コ 0O BU ま ( つ 。 ら 6) =CHR ま ま ( 16) +" 人 エリ + ビ HR 生 (16) + す "や"+ ビ HR 生 ( 10) + ビ HR 和 まま ( さ 4) "リキ CHR 和 まま (O)+ す "や ーU " 十 
CHR$ ま (日 ) "タル 3"+CHR ま ( 16) "人 Hb 還 ー 人 まめ 人 "+ キ CHR ま (1 日 )+" HI!U 1D" 

4490 BU$(2。 ら 6) BU も (2。6) +CHR 和 も (O) +CHR 和 も (16) +"P"+CHR 多 (0O) +CHR ま も (O) +CHR$ ま (日 ) CHR$(0)+" 昌 " 


特集 SPACE SHIP 


SZ 


+CEHR も (0O) + "や リキ ビ HR ま (O) +EHR ま (O) +EHR 和 まま (O) +EHR ま (16) す リ 

4500 BU* ま (2。 ら ) BU も (2。 ら ) +CHR ま (日 ) +CHR 和 (0) +EHR ま (0 〇 ) +CHR も (1) +" や ちゃ る 9ー1 せ "+CHR ま ( さ 4) +CHR$ ま ( 
B) +CHR ま (16)+" せ 上 "キビ HR ま (O) すり まる 人 川 リキ CHR ま (O) +EHR ま (12 つ ) +CHR ま (O) 二 "日 

4 ロ 10 BU ま ( つ 。 ら 6) =BU ま も (2 つ 。6) +CHR ま も (O) +CHR ま (0) + す "人 リキ CHR ま も (OO) + "サリ"+CHR ま (0) +CHR ま (0) +CHR も (日 
)+ "B+CHR ま (OO) "用 隊 せ P"+CHR ま (O) +CHR 和 ま (O) + ビ HR ま も (16) す " 昌 や "リキ CHR ま (日) 

4520 BU も (2 6) ニ BU ま (つら) 二 " 目 せ リ キビ HR 和 まま (2 つ O0) +C ビ HR ま (O) "9"+CHR ま (日 ) CHR 生 ( 16) "サリ"+ ォ CHR 生 (日) キ " 
多 "オビ HR ま (O) キビ HR ま (O) +CHR ま (日 ) "や 1 人 せ 季 "と CHR ま (OO) +CHR ま (1 ブ ) 

45 さ O BU ま も (2。6) =BLU も (2』 ら 6) +CHR ま (0) + "0FU"+CHR ま (日) "日 

454O RS ま (O0』1) =" 旧 " 

455O_ RS ま も (0。2) =" 兄 " 

4560 RS5 ま (O』 さ ) =" 了 ー ミ O" 

4570_ RS ま (0』4) ="0HC" 憎 3 藻 "+CHR ま も (14) 

45BO_RS ま (O 〇 。 王 ) =" 北 すす Je 相 け 7 聞い て で "キビ HR ま ( プ ) + ビ HR ま (7) "上 較 ま て 人 生じ HR ま ( 15) +" 祥 で で 二 自 還 % " 
4590 RS も (O。 ら 6) =CHR ま ( 〇 ) + "1 全 リ + キ CHR 和 まま ( プ ) + ビ HR ま (1) +CHR ま (14) +CHR 和 ま ( フ ) +CHR 和 ま ( プ ) + じ CHR ま (1 王 ) +" 
ママ く xxP ロ 10" +CHR ま も ( 24 ) + じ 上 HR ま (2 日 ) +CHR 和 まま (14) + ビ HKR ま (1 王 ) + ビ HKR ま ( 15) 

4600 RG も (O。 ら 6) = ニ RG ま も ( 〇 ひら) +CHR ま (1) +CHR 生 ( プ ) +CHR ま ( プ ) "きせ "TSTRTNG ま (CHR ま (O) 。4) +" 諾 mrTO 早 
回 Im < 4 氷 凌 十 日 目 づけ 活 上 サ "TSTR INB ま (CHR ま (O) 。4) "リタ x イ 半 宙 に: " 

4610 RG$(0。6) =RG$( 〇 6) +CHR ま も ( 29) +STRING ま (CHR ま (0O) 。4)+ "0 ほす "+CHR ま (0) + "OH 人 キ キテ WTTTT 
で 2 菩 "+STRING ま (CHR ま (0) 。4) 二 で 3 王 覧 | 1 モエ シ ジワ 7 字 2 「+EHR ま ( 〇 ) 

4620 RS も (1。1)=" 唱 " 

46 さ O RS ま (1。2) = リリ +EHR ま (O) 

4640 RS ま ( 1。 さ る ) =" ビ ミ 還 " 

465O_ RS も (1 。4) = リ "EuUZ イ マミ ェ エリ 

466O RB まま ( 1 。 弓 ) = ビ HR 和 まま ( 〇 ) 二村 リキ ビ HR ま (1 王 ふ キビ HR ま ( 15) + ビ HR ま ( 155) "で Bwn ミ ーm 人 り てく 上 議 " て て 居り +CHR ま ( 
14)+ "前 く エ 人 本目" 

467O_R5S ま ( 1 。 ら 6) =STRINB ま (CHR ま (O) 。 王 ) "時" +EHR ま ( フ ) +EHR 和 ま (15) +HR ま ( プ )+CHR ま ( プ ) +" 較 くつ 1 日 1 
1C こ テ 天 訟 すす 1 す ) 較 "TSTRING ま (CHR ま (0) , さ ) + "キリ キビ HR ま ( プ ) "本 日" +CHR ま (24 ) 

4680 RS ま ( 1 。6) =RS ま (1 。6) "ET リ +EHR ま (7) +PHR ま (SB) + リト 還 全 | 十 語 村 テト "りす CHR ま (OO) + "て m+ 
多 上 > て 困り +CHR ま (0)+" 中 "TECHR ま (0) +CHR ま (Q) +" 氷上 四 回 9" 

4690 RS ま (1。6) =R5 ま も ( 16) +STRINB ま (CHR ま も (O) 。 4) 二 "EE 導 失 JE vmhykEEPOFBxx 了 " 7 "TSTR TNGB 
ま も (CHR ま (0) 。4) 

4700 RS まま (で 。1) 三 " 旧 " 

4710 RG 欠 (2。2) = リ "3" 

4720 RS ま (2 つ 。 さ ) = ニ " ワ ウタ OO" 

47 さ O RG まま ( つ 。4 ) ="F 直 本 |! ホ コブ "キビ HR ま (14 ) 

4740O RS も (2。5) =" 園 バ H ま @ ブ ゴロ ※ ロ ー。 "キビ HR ま (2 日 ) "宮上 れ リ キビ HR ま (OO) "Xs "TEHR ま ( プ ) "は " 略 ] "キビ H 
R ま (12) +CHR ま (24)+" 医 " 

4750 RB ま (G。 ら 6) = リ "は リキ CHR ま (7) +STR TNG ま (CHR ま (15) 、 さ ) "で 1FL 還 0ah 1B"+EHR ま (2 王 ) +CHR ま ( 155) +" 
消 凌 "+CHR$( 19)+ 119= 診 T1"+STRING ま (CHR ま (9) 。 マ ) + " 還 還 Tm 信 す 9 キ う 症 " 

4760_ RB まま (2。 ら 6) = ニ RS ま ( 伺 。6) +EHR ま (24) す "OO 欄外 12Y 填補 Im て"+CHR ま (12) +CHR ま (0) +CHR ま (O) 
+ リ ニーv ト mmm 記 せり +STRING ま (CHR ま (O) 。4) + 0 語 上 衣 リ キビ HR ま (1) 

477O RS ま も ( ご 。 ら 6) = ニ R5S ま も (人選 。 ら 6) "時 目 目 民 2 ル 宙 ET リキ STRTINB ま (CHR ま (O) 。 プ ) "上 是 上 邊 に 朱 浴 6P 李 2 宣 昌 IT て IS 
菩 上 |"+STRING ま (CHR ま (の ) 』 さ ) 

478O_RS ま ( さ 。』1) 三 "中 " 

4790 RS ま ( さ 3。2) =" 紀 上 " 

48BOO_RS ま ( さ 。 マ ) = 回 時 2" 

4 ヨ 810 RS ま $( さ 3。4)= リ ドー 回 本 EE(" 

4820 RS ま ( さ 。 己 ) =C ビ HR$( 15) + じ 上 HR 和 (2B ) "vV 全 合せ LT9 計 S く で "キビ HR ま ( プ ) "Bf ェ 較 "+CHR ま (2B) + リ ジ ユ 
Cf d 詳 ダ " 

4 さ O RS ま ( さ ょ 。 ら 6) = ビ HR ま ( 〇 ) すじ EHR ま (0) 二 り は 人 リ キビ HR ま ( 15) "で コ 妥 ミタ | 昌 争 邊 TTY 拉 凌 リキ CHR ま ( プ ) すげ" ル 
"+STRING ま (CHR ま (0) 』 さ ) + す " 失 て 正 放 エリ + ォ CHR ま ( 24 ) +CHR ま (12 ) +CHR ま (1) 

4840 RS ま ( さ 。6) =RS ま ( さ 。』 ら 6) 二 "GO "TSTR TNGB ま (CHR ま (O) 55) 直り 護 EE で 千 リキ CHR も ( フ ) + "0 さら " 
+CHR ま (15) +CHR ま ( プ ) すり ユー 和議 で "キビ HR 和 ま ( プ ) "エリ + キ CHR ま (0 〇 ) +CHR ま も (0) "1U" 

485O_RS ま ( さ 。 ら 6) =RS ま ( さ 。 ら 6) +CHR ま ( プ ) +CHR ま ( 14)+CHR ま ( SB) +CHR ま (2 日 ) "で リキ PEHR ま (12 つ ) +CHR ま (14 ) 
す 藻 疾 貴 芋 楓 "+STRING ま (CHR ま (O) 、 さ ) +" 足 名 還 5OF 日 リキ CHR ま (14 ) +CHR ま (プア ) 

4B6O_ RB まま ( さ 。 ら 6) ニ RS まま ( さ 。 ら ) "区 Vn 全 飲ま て マリ キビ HR ま ( 15) + ビ HR ま ( 15) の 全 要件" TSTR TNGB ま (CHR ま (O) 。 さ ) 
4 ヨコ 70_ RG ま も (4 ょ 1)= リ "日" 

48BBO RS まま (4。2) = リ "ワリ 

4 ヨ 90_RS ま (4 ょ さ ) = リ "ワー?" 

4900_ RS ま (4』4) ="Bn ヒ E 諾 ミリ ウッ" リ + ォ CHR ま (2 日 ) 

491O_ RS まま (4。5) = じ HR ま (14) + じ CHR ま ( 17) +EHR ま (16) 二 リン od 倫 キ キ OF 合 す "キビ HR ま ( 1 プ ) +CHR ま (O) +CHR ま (O) 
+ リ blF そ ちせ "キビ HR 和 も (うさ ) +" 提 生 ニ 4 "キビ HKR ま (日 ) す CHR ま (2 日 ) 二 " 。 還 語 " 

492O_RS ま (4。6) = リリ + じ HR ま (ププ ) 二 り 呈 有 リ キビ HR ま (15) "人 か まり キビ HR 和 ま ( プ ) +CHR 和 まま (155) + ビ HR ま (14) +"1 回 馬 xs 
・"+CHR ま も ( フ ) +CHR ま ( フ ) +CHR も ( 1) +CHR ま ( プ ) +" 突 1m1/ ほ " リ +BTRTING ま (CHR ま (0O) 。 さ ) 

4930O_ RS まま (4。6) = ニ R5 ま (4 ょ 6) 二 " 園 き 上 "キビ HR ま ( 1B) + ビ HR ま ( プ ) +CHR ま (OO) 二 "UZTS 守 和 せ リ キビ HR 和 ま (O) +CHR ま (O) 
"は リキ CEHR ま ( 〇 ) + "1"+BTRING ま (CHR ま (0O) 。 さ ) +" リキ CHR ま (O) +" 30 本 Hm コル U" 

4940 RS ま (4 ょ 6) =R5 ま (4 ょ 6)+STRINB ま (CHR 和 ま (O) 。4) +EHR ま ( フ )+" 洛 軸 馬 計 表す 生 定格 WI 1 リキ CHR ま ( 〇 )+" 
せ リキ CHR 和 も (O) + "ルリ + キ CEHR 和 まま ( 〇 ) "サリ + キ CHR ま (19) + キ "リト mm 拓く "キビ CHR ま (O) +CHR も (O ひ ) 

4950_R5 ま (4。6) = ニ RS ま (4。6) +" 語 選 LH"+CHR ま (2B) +HR ま ( 12 つ ) +CHR ま (日 ) +" 較 マキ エリ +EHR ま ( 15) TEHR ま (7) + 
リッ リ ォ CHR ま も (14) +CHR ま (2 日 ) "0a 沈 5RS EE9"+CHR 和 ま (0)+" 上 リキ CHR ま (O) +CHR ま (O) 

4960_MN ま =" リ +C5R+EAFBA6R さ + ビ 4+D 1 キビ さ 人 RT キビ 4+D 1 + ビ さ 人 キビ 4+D 1+ じ さ AB6R さ F さ BA+D+CE5RGBAF6R さ " 
4970_RETURN 
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MZ-700 (Hu BASIC) 


7 こり マー ジャ ヤン (w す る フロ クラ ム ) 


久 ジャ ンピュータ 


数 年 ま を の こと で す が , スペ ー ス イン ベ 
ー ダ を きっ か け に , 新しい ジャ ン ル の レジ 
ャ ー (?) と し て , TV ゲー ム が 一 世 を 風 び 
し まし た 。 全盛 期 ほ ど で は あり ませ ん が 信 
で も 次 々 と 新しい ゲー ム が 発表 され, ゲー 
ムセン ター で は それ ぞ れ の ゲー ム の 猛者 た 
ち が ハ イス コア を 競う 光景 が み ら れ ます 。 
大 ヒッ ト し た ゲー ム は 今 も 語り 草 に な っ て 
いま す が , 昔 の ゲー ム は 次 を 消し つつ あり 
光 し い 思 い を し て いる 方 も 少な く な いで し 
ょ う 。 ど こ か に TV ゲー ム の 名 作 を あつ め 
て いる 店 が な いで し ょ うか 。 

き て 数 々 の 名 作 の 中 に 麻雀 た いえ ば まず 
「 ジ ャ ンピュータ 」 で し ょ う 。 設定 は 2 人 
麻雀 と いう 特殊 な も の で す が , 得点 だ け で 
な く タ イム が 問題 し な っ て いて 非常 に スリ 
ル が あり まし た 。 強い 機械 と 弱い 機械 が あ 
っ た よう で , 弱い ほう は コン ピュ ー タ 側 は 
めった に あがら な か っ た よう で す 。 で きる 
だ け 次 に 切る も の を 早く きめ , す ば や 〈 切 
っ て , 面前 で リー チ に むか う の が 得策 で あ 
っ た よう で す 。 そこ で 前 に 作っ た ひと り 麻 
雀 練習 プロ グラ ム を も と に , ジャ ン ピ ビュー 
タ 型 の 「 ふ た り 麻 雀 ゲー ム 」 を 作っ て み ま 
し た 。 特 徴 は 1 人 練習 用 の と き の , メモ リ 


機能 (一 局 の 再現 と , 再 プ レイ が で き 4 機 
能 ) を その まま 改造 し て つけ た こと で す 。 
ジャ ンピュータ の よう に タイ マ は つけ ませ 
ん で し た か ら , メモ リ 機 能 と あわ せ , じ っ 
くり 考え て 練習 で きる わけ で す 。 も ちろ ん 
早打ち で や っ て も いい わけ で す 。 ファイン 
グラ フィ ッ ク こ を 使え な いま で も 少し や れ 
ば すでに 慣れ る で し ょ 2 う 。 
/ 久 ロー ド と セー フ の 計 

この ゲー ム で は コン ピュ ー タ 側が 思考 ル ん 
ー チ ン を も っ て いる の と , 最初 グラ フィ ッ 
ク が や や 遅く 感じ た た め , その 部 分 を 機械 


語 に 落と し て あり ます 。 それ は いい の で す 
が グラ フィ ッ ク の 機械 語 ル ー チ ン と いう の 


福田 浩介 


が 問題 で あり ます 。MZ-700 は V-RAM, す 
な わ ち 画面 に 関連 し た メモ リ は , BASIC の 
起動 と 同時 に バン ク 切 り 換え に よっ て 裏側 
に な っ て し まう の で , そこ を ユン トロ ー ル 
する に は &HD000 一 HEFFFF 以外 に サブ 
ルー チン を 置く こと が 必要 で す (きる も な い 
と 裏側 を 呼び 出し た と だ た ん に 命令 が 裏側 に 
入っ て し まう の で , 走 が お こり ます )。 る を 
こ で 5 月 号 の 青木 きん の 記事 の よ う に , Hu 
BASIC 本 体 の すぐ あと に 機械 語 部 を すべ て 
お し こん で し まい ,BASIC で 書い た 部 分 は , 
NEW ON で 少し あと の ほう に 置き ます 。 そ 
こ で この 機械 語 部 は SAVEM` フ ァイル 名 7。 
&H8990, &H987F の よう に &H8990 番 地 か 
ら &H987F 番 地 に 入れ て , BASIC 部 は NEW 
ON &H9880 と し て か ら 入 れ ま す 。 こ うす る 
こと に よっ て 普通 は 機械 語 ル ー チ ン は BA 
SIC で 書か れ た 部 分 の あと に つく の を , 逆 
順番 に 格納 し て ある こと に な り ま す 。 


/ 留 ケー ム の 遊び 

プロ グラ ム の 機械 語 部 , BASIC 部 の ロー 
ド を 終え を る と いよ いよ ゲー ム 開 始 で す 。 R 
UN する と 「 セ ツメ イ が ガ イル トキ へ … コ 
と 聞い て きま す の で , Y を 押す と , ルー ル 
や 操作 の 方 法 が で ます 。 ス テハ イ は A 一 N 
の キー で 行ない ます が , 和 了 の と き は +( プ ' 


特集 ふた り マ ー ジ ャ ン 9② ら の 


ラス ) の キー を 押し て くだ る い 。 ま た 常に 
先手 は ゲ プレイヤー に な っ て いま す 。 注意 し 
て いた だ きた い ル ー ル は , リー チ 料 1,000 
点 は 流 局 する と 相手 に いっ て し まう こと と , 
ドラ が NEXT で ある こと それ に ポン チー カ 
ン が で できない ゆこ と で し よう が 。 それ と 表 ド 
ラ が つき ます 。 も ちろ ん コン ピュ ー タ 側 も 
手 を 造っ て いま すか ら , リー チ が か か っ て 
振り 込み に な っ た だ たり も し まれ も 

さて , 次 に 説明 を 読み 終 を て どれ か の キ 
ー を 押す と 「GAME OR MEMORY G/M」 
と 開い て きま す 。G を 押す と 普通 の ゲー ム 
が で きる わけ で す 。 半 チャ ン 制 で すか ら 少 
て と も 8 局 が 楽し め り る わけ で す 。M を 押し 
た と き の 説 明 は あと に し て , この 場合 の 進 
行 を 説明 する と , まず 音楽 が 流れ て 「 タ ダ 
イマ シー バイ チュ ウ 」 と で ます 。 RN 
D 関 数 で 牌 を 混ぜ て いる と ころ で す 。 そし 
て プレ イ の 画面 が で て 配 筐 と 第 一 ツモ が で 
ます 。 あ な た は 第 一 打 を 切っ て くだ さい 。 
そし て 次 は コン ピュ ー タ 側が ステ ハイ を し 
ます 。( 画 面 の 上 部 に 出 ま す 。) これ を 繰り 返 
すう ち に あな た の 手 が テ ン パ イ し ます と , 
捨て 牌 が 終っ た 時 点 で 「 リ ー チ テ カケ マ 
スカ 」 と 聞い て きま す 。 自 動 的 に 聴牌 し た 
こと を 判断 し て いる の で す 。 リ ー チ し た け 
れ ば Y を し た だ たく な けれ ば N を 押し て くだ さい 。 

リー チ を か ける と 音楽 が 鳴り 。 ス テハ イ 
に 赤 ワ ク が つき ます 。 も し ツモ っ た り 。 和 
9 有 が 出 て ロン する と き は ,。 キー を 押し 
て くだ きい , 自動 的 に 得点 が 計算 きれ ます 。 
な お , ツモ あがり の と き , 親 と 子 が 払う 点 
数 が で ます が , コン ピュ ー タ と の や り と り 
は 合計 得点 で す 。 ま た , コン ピュ ー タ が あ 
が っ た と き は あな だ た は た だ 次 の 局 を 待つ だ 
け で す 。 流 局 の と き は コン ピュ ー タ の 最終 


8990-89A6 
89B0-89BC 
89p0-89EC 
8A30-8B24 
8B40-8F23 
9030-90C9 


3 枚 組 判断 
2 枚 組 判断 


90p0-9128 
9130-914F 


9150-949C 
8F40-9016 
9700-9772 


牌 表示 
振り て ん 判断 


の の OnhiMZ 1983.10. 


各 牌 の 枚数 クリ ア 
各 牌 の 枚数 数 え 
トイ ツ の 数 判断 


シャ ン テ ン 数 判断 
どれ を 切る と 何 シ ャ ン テ ン か 
最小 シャ ン テ ン 数 に する に は 

どれ を 切る と よい か 
どれ を 切る か の 判断 


手 も 表 示さ る れ ま す 。 

今度 は 先ほど の と ころ で M を 押し た 場合 
で す 。 操 作 は G を 押し た と き と ま っ た く 同 
じ で す 。 た だ 一 局 終る ご と に 「 イ マ ノ ヽ キ 
ョ ク ヲ モウ イッ カイ ミ マ スカ 」 と 聞い 
て くる の で す 。 Y を 入力 すれ ば 再現 フィ ル 
ム が で ます 。N を 入力 する と 「……… ン 4 
モウ イッ カイ ヤリ マス カ 」 と 聞い て きま 
す 。 Y を 入力 すれ ば 同じ 配 牌 同じ ツモ で も 
う 1 回 や り 直 し が で きま す 。 こ こ で N を 押 
す と や っ と 次 の 局 へ と 進み ます 。 メ モリ ー 
モー ド は , 再現 フィ ルム と 再現 デレ イ の 2 
つが で き , し か も ゲー ム も 進行 し て いく わ 
け で す 。 ま た 再現 プレ イ を する と そちら の 
得点 の み が 有 効 と な り ま す 。 


旬 BASICh の 説明 


メイ ン ル ー チ ン は 1 一 230 行 で す 。 その う 
ち 1 ダ 巡 の 手続 き は 50 一 180 行 で 行なっ て いま 
す 。20000 番 全 は 得点 計算 ルー チン , 30000 
番台 は メモ リ 機 能 用 の ルー チン で 再現 フィ 
ルム は ここ て 処理 され ます 。10000 番 台 に は 
1 人 用 麻 種 では シャ ン テ ン 数 判断 が あっ た 
の で す が , そこ は 機械 語 に 落と し まし た 。 
今回 の 肝心 な を と ころ で ある コン ピュ ー タ 側 
の 処理 は 6000 番 至 の ルー チン で 行なっ て い 
ます 。 ここ で 特に シャ ン テ ン 数 判断 を 使っ 
て いる の で す が , CALL 文 で マシ ン 語 を 呼 
ん で いる の が わか る で し ょ う 。 ま た 8000 番 
友 は 最後 の 相手 の 手 牌 表示 , 7000 番 台 は そ 


^" の た だ ため の ソー ティ ング で す 。 1 人 用 の と き 


か ら 増 えた 変数 は , 相手 の 手 牌 HH4⑪), Y 
4 が 裏 ド ラ な ど で す 。 ま た 振り て ん 判断 も 


8900-89CD 
89CF 
8A00-8A2A 
8A2C 

8A2D 

8A2E 

8A2F 
8F2E/2F 


8F30 
8F31 
8F32-8F3F 
LA 4 
94FE 
94FF 
9500-96FF 


VY ポ ボー で 上 巫 ぶ ーhKYH 


さらに 強化 され. チョ ン ボ を 見 逃し ませ ん 。 
チョ ン ボ 料 は 満 吐 分 で す 。 

マシ ン 還 の 

マシ ン 語 ルー チン の マッ プ は 表 1, その 
中 で 扱っ て いる 変数 は 表 2 の の よう に な っ て 
いま す 。 思考 ル ー チ ン , 上 表 示 ル ー チ ン , 
振り て ん 判断 ルー チン の 3 つ に 分 か れ ま す 。 
この 思考 ルー チン に つい て は 5 月 号 で BAS 
IC で 発表 し た も の を 機械 語 に し た も の で す 。 
牌 表示 ルー チン に つい て は 前 に 書き まし た 。 
よう に , 機械 語 で 0UT(E3),A と し て V-R 
AM を アク セス し , 最後 に OUT(E1),A と し 
て 元 に 戻し て いま す 。 そし て 振り て ん 判断 
は , あがっ た 時 点 で 他 に 和 了 で きる 幅 が な 
か っ た か どう か を 探す と いう 方 法 で 行なっ 
て いま す 。 以上 3 つの 部 分 は ぼう し て も ス 
ビ ピード が 欲し か っ た ため マ シン 語 に し た だ わ 
け で す 。 改行 LOAD, SAVE の 際 は 《 れ で ぐれ 
も 手順 を 間違え を な いで 《 だ さい 。 それ で は 
健闘 を 祈り ます 。 


アガ リ の 手の内 容 
シャ ン テ ン 数 

各 牌 の 枚数 

チー トイ ツ 用 トイ ツ の 数 

2 枚 組 の 数 

トイ ツ の 数 

3 枚 組 の 数 

牌 表示 基準 番地 
牌 の ワク の 形 

表示 幅 

字 牌 の デー タ 

何 枚 目 を 切る か 

コン ピュ ー タ が チョ ン ボ か どう か 
あがっ た 人 (チョ ン ポ 判断 用 ) 
振り て ん 判断 用 メモ リ 
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TEMF'6IFRINT" 悦 " 

DEFUSR 1 =%&HBQ 

DEF INT 一 ビュ ローM 

X= ニ 136』 X1= ニ 0= メニ ニ 03 X さ =1 
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2 さ IF ま $="M" THENMM=1ELSE IFA ま ="G ロ "THENMM= ニ OELSES1 
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ざさ 0N ひ O MDE 
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140 内 和 ま = ニ INEEY ま :TFR ま = リリ aRNDIBE 15OTHENTB= ニ 1 エロ +1: BHTD14O 
141 IFA ま も まく > リ ォ キリ ANDQ ま >" "THENT ヨ =O GHTO140 


145 IF(TB=150) THEN17O 
5O IFA ま ="+"THENMUSTC"DORD さ R1 一 BORD さ R 1DORGB さ R 1BORE さ R 1BORD さ R 1DORE5" 5 日 (14) =1 さ :RH=19: 
ドコ =1 : CURSHRO。 1 1:FRINT" ロ 1 1 "siBFC(10) siELSEG ロ T ロ 17O 

1 紀 1 FDRI=1T ロ 14:POUEE3&HB ウ EBF+T。H(T) NEXT 

152 PUEE39%&H94FF 。 EE: FUKE2%&H ワ 680』 CHN : CALLS&H ワ ZOO ビ H ロ ロミ モビ EE に 3 (&H94FE ) 

15 さ IFEHD=OTHENPR INT "【 計 守 朗 数 32 ウト イマ トブ フェー 生年 コチ キュ コリ BUSUB2OO10 

154 19= さ 1: GUT ロ 1 ヨ O 

170 IFRK9=1THENFDKE32&H96 コ O+CHN。』 1 さ : ビ HN=CEHN+ 1 

1 ヨ 0 NEXTI9 

181 IFAB(KE) :OTHENAB (RE ) =O 

12 IF ド 9(1)=1 ANDKE く >1THENY ヨ =Y ヨ +10Q0O 

18 さ IF(KE<4) THENY=ーYB: FUR エ =1TD1OOOOI NEXT = 1F に ワ =1 THENY=YBー1OOO BUTH186ELSE 186 


1 ヨ 4 IFCHO>OTHENNMUS1C"G5D 1 RDR 六 DDR#F さ RGR " : CURSUR1 呈 。10:FRTNT "フリ テコ キョ ニコ 系 11 98GHT ロ 191 
185 IFM=ー-1THENNMUSTC "5D 1 RDR 柱 DSDR 手 F さ RBR " 5 CURSUR 15。10EPRTNT "キョ 系 に 11798BDTOD191 
16 IFCHO1 >O0THENCURSUR1 呈 。10*FRINT "フリ テー キョ ー ホ 11"sTFBEK(1) =OTHENY ヨ =1 さ OOQOELGE Y ヨ =9Q000 


187 IFRU1=RITHENYB=YB+10OO 

1 IFR ロ =R1 1 THENY ヨ =Y ヨ -10090 

190 IFM=OTHENMUSIC"C3RGF5C5D3EFBQ6" 5 CEURSHR15』10I PRTNT "リュ ウキ ョ フウ" CEURSDRO』14:PRINT" ア 
イ テ キー テリ" リュ ミ H4(14)=45: GHSUB7O00: X ニ ー2』Y= ニ 155: F ロ RT1=1T ロ 13: X ニ X+2: BHSUB ヨ O10 NEXTJ1: CURSUR2 
2。15:FRINT" 二 寺 "gFDRT エ =1TU1OOOOI NEX 征 

191 FORI=1TOU10OOQOs NEXT 

192 IFM=ー1 DRCHU>OTHENTFY フ = ミ 1 THENYB=ー1 2OOOI ELSEYB= ニ ーBOOO 

19 さ IFK9=1 ANDNM ぶ 1 THENY ヨ =Y ヨ ヨー1000 

194 Y1O=YBiF(1)=F(1)--YBsF(4)=F(4)+YB 

19 IF (MM=1 ) THENGUSUB さ 0010: GUTUE13 

20B IFM:O_aNDY7= さ 1 THENER=BEー1 : BUTH29 

210 IFF(5) く ヨ THENF ( 弓 ) =F ( 弓 )+1: GHTUE 

213 IFMRS 1THEN216 

214 Y 昌 =Y10sF て (1 ) =F*(1 ) +Y:sF(4)=F(4) YY 

2155 BDT0D ミ 1 

216 IFNA= ニ 2 RANDY フ = ニラ 1 aaNDM:OTHENEF ド = ニ B ロ ドー1 : BHT ロワ 

217 IFM=2THENIFF ( 巳 ) :7THENSSOELSEF ( 呈 ) = ニ F ( 巳 ) +1 : BHT ロラ 

220 PRINT" 5s CURSDR14。10EFRINT "ハニ キャ ーー オロ リリ" EEURSTR さ 。11:FRINT" ア や ナタ ボボ 入 ま 5 Mt 生ん 
4) 3 リキ フェ" の "3 CURSHR さ 』 12 FRTNT "コー ニー ヒ 5 ュ ー タ 2 トウ キー ポー "saF(1) う 39 キュ テリ" リョ MUSTC"D5CDEGED 
6R4E5BRG さ TDSEAG5D 1 RDR##DSDR##F ミ RBR " 

230 END 

1010 REM-17 イイ 

102O_ FDRI=OTH1O7s 人 ( エ +1)= ニ FIX(T/4)+1+FIX(TNT(T/4) /9) iNEXT:FURIT=1OBTD135』 (エキ 1) = ニ ネ ド 
TX(T/4)+2FTX(FTX(T/4) / ワ ) 一: NEXT = X ニ 1 さら 

103O_ FUR1 ユ =1TUH4OOD:X1= ニ FIX(RND(X さ )*X) 二 1:X で = ニ FTIX(RND(X さ )*X) 二 15SMQFR(X1) 』R(X2) ENEXT 
1070_ REM ハ TS 

108BO_FUR1 ユ =1TO1 ミ < ミ H(T)= 和 ロ (T*4) = 日 1(T)= ニ ロロ (T*4ー1 ) :NEXTI 

1090_ RETURN 

3O00_ IFIS1OTHENEOLURS ょ DE BHTUDSO4O 

さ 001 IFISEOTHENCULUR5 ょ 9 BUTUSO4O 

3 さ OO2 IFTE3OTHENCHLUR4 ょ Oi BHTHSO40 

さ 01 の 9 1FI= さ 9THENCULUR7 ア 、 ア 

さ OEO IFI=41THENCDULDRO。 4 

さき 0 る 0 IF エ =4 さ THENCHLURO ェ 人 

さき 04O_ FRINTJE 和 ま * ECDLHR7 ょ ORETURN 

4000_ CURSDR1 1 BiPRINT" 22 リ コー ミド ネコ ー ターム" CEURSURS。10E PRINT "モウ メイ 用" ルト キ ルリ 上 Y] ラ イラ ナ 
ああ 記 N| ENJ 9 5 チリ の サイ" 

4010 内 本 =INEEY ま :TFR ま も =" "THEN4O1QO 

4020 IF も ="Y"THEN403OELSEITFA ま ="N" THEN4100ELSE4010 

40 さ O_PRTNT" 屋 " 

4040 PRINT" ル - ル リト コナ コー で ワ ジー リー コキ ャ フエ ST EPRINT "本 5 っ キー カフ リル アリ SE sgPRTINT "fg と リナ の 
ラ ト ^ う アリ テリ "PRINTZH さ も : FRINT "エリ ロイ リル 人 nーN コテ" / KEY テ " オ コ ナ イ マス"sPRTINT" 了 アカ" ル トキ バキ / 
KEY ラ オミ 2 ウタ "すす イツ" 


4045 FRINTZH さ ま ミ PRTNT" マ コス トーーー マ で ミ ヒッ ココ ーーーー* 3 ソー ヌ ド ーーー ソス "EPRTNT" リ ー チ リョ ウル 1000 
SS は 

4055 PRINTZHS$:PRTNT" ナ カト マコ カト ルリ ナジ キト ラリ FRTNT" ト に う ON NEXT キリ 

4060 PRINTZH3 ま iPRINT" サイ コー ニ MEMRY モー ト ^ ニ キオ フト 1 キョ フー ノ サイ 9 トコ ヤ ヤリ ナオ ジ カト テー キス リ 


PRTNT" ソ レー ヲ ケンキュウ シキ りり ヨ ワ フ ナリ っ ウリ 
4070 FRINT:PRINT"PUSH ANY EEY" 

40BO =INKEY ま :TFA ま =" "THEN4OBO 

410O FRTNT" 屋 "RETURN 

5O1O_ REN に ョ ウミ" 

503O Z=53248B!+40 ま Y+X:Z1= ニ つら 6+Z MDD256: アコ ニコ 55+Z\256 

5Q40 POKE3&HBF2E。Z1:FUKES&HBF2F,Z2 FORE3%HBF1 1:FOKES&HBF さ O ょ H(J1) 5 CALLSHBF40 
5O5O_RETURN 

600O KE=KE+1: IFKE=4THENKE=1 

601O ロ NKEGTU6020。 60 さ 0。6040 

602O FDRT=1TD1 さ :H4(T)=H1(T) :NEXTTs IF(K9(1)=1) THENH4 (14)=I4:BDTD6O041ELSEH4 (14) = 人 ( 
19*4ーKE) : GHT6O41 

603O FORT=1TD1 さ :H4(T)=H2(T):NEXTI:H4(14)=Q(19*4-KE) : BDTD6041 

6Q40 FORI=1T ロ 1 さ :H4(T) =H ミ (1T) :NEXTT:H4(14) = 人 (1T9*4ー ド E) 

6041 FDRI=1T ロ 14:PUKE3&HB9BF+T 。H4(T) ENEXT 

042 IFK9(1)<1THENa0BO 

604 さ PDKE3&HB991 。 14: FDKE3&HO40+ 14: CALL&H9O さ Os PDKES&HB991 。 1 さ : POKES&H9O40 1 さ : NM さ =P 
EEK3 (&HBA2F ) : 4=FEE に 9 (&HBA2E ) 
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6O44 IF(M さ =4 QRNDM4=1 ) THENAG (EE) = ニテ エ ワ 9: MUSTC"F4R1F さ R1FORF4R 1 GR1BORBSR1FORF3R1EORF プ 
"s CURSUR5。 Qi FRTINT "ロー "IE ロニ 1:R ロ 1= ニ 19 ELSE6O4 ア 

6045 FUKE32&H ウ 4FF。EEs PUEEDH955OO。 CHN 1 : CRLL&H ウ フ OO CHD 1 ニモ FEE に (SH ワ 4FE ) 

ら 6046 GUTH6S1O 

6047 PURKES3&H ウ OO+CHN1 。H4( 14) iCHN1=EHN1+1:H4(14)= ロ (1 ワ ※4ー ド RE ) 

604 昌 PURE32%&HB ヨ 9CD』H4(14) 

6049 IFK9(1) ぶ 1THEN6O8BO 

605O_ PURE32&HB991 。14:FURE32&H9O40。14:CALLH ウ O さ OFUEE3D%&HB991 』135 FUEE2SH9O40。 1 マミ マニ =P 
EER3 (%&H ヨ BA2F ) : M4=FEEES (SH ヨ ASE ) 

6060 IFM ス =4 QANDM4=1THENAB (RE ) = ニ エ 9: MUSTC"B1RGBRGR 提 D6F 1RFRFRD6" 5 CURSDR。 OFPRTNT "9 モ ! 
"s ドコ =O0: GT1 (1 エ 9) =10O: BHTO62S1O 

6O61 1 ミ =H4 (14) : 12 つ =14: BDTD6210 

6080_ FURE3D%&HBA2B ュ 1: CQLL&H9ODOI FUREESDSH ヨ BSH。O 

609O CALL&HB9BO: FUEED%&HB991 、14: CALL&HB ウ 90OI FUEED&HB99 1 。1 さ 5 CRLL&H ワ 91 さ Os 1T コ ニ PEEK⑳ (&H ワ 
12F ) : SGHA=FEE ド 3 (%&HOSE ) 

615O_ CURSDR7, ら 5 

6160 FURE3%&H9500+CHN1 』H4(T2) : CHN1=CHN1+1 3 1 ミコ =H4 (TS) SMAFH4 (IT2) 。H4(14):H4(14)=45: エ 
F (SHQ=O) QND1I9* さ 1THENMUSTC"G さ R 1GORD さ R 1DORGB さ R 1BORG さ R1GORBSR1GORB3R1GORD さ R1DORG ロ 6 "= 
ド K9(1)=1iRI(1)=19: CURSDR』 Oi FRTNT "リー キ 1 

6170_JN(RKE) BHTH61 ヨ 0 ょ 6190。6200 

618O FDRI=1TD1 さ :H1(1T)=H4(1T):NEXTEBHTU6210 

ら 6190 FUR1=1T ロ 1 マ :H2(1I)=H4(1I) NEXTI GHTH6S1O0 

6200 FDRI=1TD1 さ :H さ (1) =H4( 1) INEXT 

6210 ド E=QRETURN 

7000 =15: BHTD7O6O 

フ 7Q010 FUR1I=1T ロ 14-C: ゴ = エ [ 

7O2O ドド = ゴ + じ ii IF(H4 (EE) =H4 (J) ) THEN7Q05O 

7030 SMAFH4 (EE) 。H4 ( ゴ ) 

7O40O = ゴー ビ s ITF (JO) THENZOSO 

7050_NEXTI 

7060 = (ビー1 ) /2 ミロ HNE+1B0TD707QI BUT ロ 7O10 

707O_RETURN 

BO10O_ REM 上 ヒョウ ミー 

BO3 さ OZ=5324 日 ! 4D%Y+Xs 7 1= ニ 256+Z MDUD2 つ 6 : アニ ニコ ロ ロ + ア \ ギ で らら 6 

040 FUEE3S&H ヨ F2E 』Z 1 : FUEES3S8HBFSF 。 7Z2 ェ PUEES&H ヨ F ミ 1 。J1 FUEES&H ヨ F さ Q』H4 (1) :CALL&HBF4O 
BO5O_RETURN 

20010 トウ 〒 ェ ーッ 生生 

2OO15 ITF ド 9=OTHENSOO5O 

2002O_ CURSURS4。1 さ : ゴ 1= ニ Os エニ ロロ ( 13 で) 5BHSUESO470s FRTNT" 硬 "* コ 1 ま * GUSUEB さ OOO 

20050 ドド 6=H(14) : X ワ =O GHSUBSO5 ヨ O 

20070 FUR1I=1TD5:L (1T) =O:NEXTI:FURT=1TU14:L(H(1I) )=L(H(I) )+1:NEXTTsL(47)=L(1)+L (9) 
+L( 1 1 ) + キ し (19) すし (21 ) + し (29) : FURT=1TOL (1 ) =L ( 曲 1)+ し (1) 上 (5 さ ) =L ( 呈 き ) +L (エキ 10) iL (5 弓 ) =L ( 弓 
5)+L( エ +2SO) sNEXT1 

2O190 L(49) = ニ 14ーL ( 呈 1 ) 一 L ( 弓 ) 一 L ( 呈 ら ) 

SOS10_ BUSUESO65O 

2022O_ IFF(1 さ ) EQOTHENSOS4O 

20 で うそ O_ BUSUBE1450: BUDSUES1570 

20240 IFMS 5OTHEN2O26O 

20245 IF(F1:L(Y5)+L (Y4) ) THENSOS6O 

20250 NM=ー1 : GHTU2O29 ロ 

2O260_ YB=X7s IF(X の EEO) THENSOSBO 

202 ア 0 X9=X9+1: GUTU2O21O0 

20280_ PRINT" コ "の サイト フ ェ キー "3 Y 日 リキ コリ 

20290_RETURN 

2047O0 "コート" カラ う や コウ 

20475 IFJ1=1THENJ 1 ま =ZH1 まで ご 和 ま =R TBHT ま (STR ま (T) 。 1) "時 絢 MTD ま (リマ ポツリ 。 エ 半 10+1。1)+" 画 "ELSE 
GOUT ロ 2O4 ヨ 0 

20476 FURJ=1TU7: TFT ニワ + ォ で THENJ 1 ま ニ 7 日 1 生 : コ G 和 ま ニ ZH ま (J) 

20477 NEXTJs GHTU2SO510 

20480 1 まま =ZH2 ま :J2 ま =RTBHT ま (STR 和 ま (1) 。1)+" 還 の TNID ま ("マネ ソリ 。 エ 10+1。1) 十 " 画 " 

20490_ FURJ=1 丁 ロア ITF エニ コワ + ォ ゴ *2THENJ 1 も ニア H2 ま * で 7 昌和 ま ( ゴ ) 

SO5SOO_NEXTJ 

3205510_ RETURN 

205BO ヒビ =15: GHTU2O64O 

20600_ FR1=1 TO14ー じ 』 ゴ = エ 

2061 の 0 ド =J+ ビ I IF (H(E ド ) >=H () ) THENSO6 さ 0 

20620 SMAFH(E) 』H(J) : ゴ = ゴー ビエ F (JO) THEN2O610 

2063O NEXT1I 

20640 =( ビ ー1 ) /E: TF(C) THEN2O60O0ELSERETURN 

20650 "メー リー ロケ 

2066O FORT1=1T ロ 1 マ 

206 プ 7 の IF11=1THEN2O69O 

206O IFHK(1I1) =H(11 一 1) THEN2O7BO 

20690 1TFH(T1) ぶ HK(T1+1) THEN2SO7 ヨ 0 

20700_B(13) =H(I1) :B(14) =H(1 1 ) : 1 ミニ 1 

20720 FURI2=1 TOU12 

207 ミ O TITF(T2=1 1 ) THEN エ ミニ エミ +S 

20740 日 (12) =H(1 さ ) : 1 コモ 1 さ +1: NEXTTSs GHSUE2O ヨ OO T1=11+1 

207BO_NEXTI 1 

20790 RETURN 

20800 IFG( さ ) >B(1) THENSOB4O 

20810 FURI2=1TD9:E(12) =B(T2+ さ ) :NEXTI2EY(1)=1:B(1)=B(1) :B(2)=6(2) :B(3) = は (③) 


特集 ふた り マ ー ジ ャ ン  @9 


208 さ 0 
20 ヨ 40 
20 ヨ 5O 
2086O0 
20 ヨ 70 
208BO 
20 ヨ 90 
209OO0 
20910 
20920 
209 さ 0 
20940 
20950 
2096O 
2097O 
2098O 
2099O0 
2100O 
21020 
21030 
21040 
21050 
21060 
2107O 
21080 
2109O 
21 100 
21110 
21120 
21130 
21140 
2115O 
21 160 
2117O 
21 18O 
2119O 
21210 
21220 
212 さ 0 
21240 
21250 
21260 
21270 
212 ヨ 0 
21290 
21 る OO 
21310 
21 さ 20 
21 さ る る 3O 
21 さ 4O 
21 さ 5O 
21 さ 60 
21 マ 7O 
213O 
21 マ 90 
21400 
2141O 
21420 
32143O 
21440 
2145Q 
21460 
21470 
21480 
2149O 
2150Q0 
21510 
21520 
2153O 
21540 
21560 
2157O 
215 ヨ 0 
21590 
21600 
2161O 
21620 
2163O 
21640 
21650 
21660 
2167O 
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BUSUB2O990 

FURT2=2T ロ 1 1 

IFG(12) く >G(1)+1THEN2O970 

FURJS= エ 2+1TH12 

IFG(JS) ミ >G ロ (T2)+1THEN20960 

ITF 1 コ = ニ STHEN2OOO 

FURX= ニ 1 THI コ ー ジ :E(X)= ニ ロ (X+1) :NEXTX 

1F ロ ご = ニ 12+1THEN2O920 

FURX ニ 1 ダー1 TUJ コ ー マ スミ E(X) = ニ ロ (X+2) ENEXTX 

IFJ2=12THEN20940 

FUHRX= ゴ ヨー2TH9iIE(X) = ロ (X+ さ ) NEXTX 
Y(1)=OiB(1)=G(1):B(S)= ニ G(I2) EE( さ ) =B(J) 
BUSUB20990: 2=132: エニ 19 

NEXTJ2 

NEXTI2 

RETURN 

IFE( さ ) く >E(1)THENS103O 

FURT さ =1 TO6: 5S (1 エマ) = ニ E( エ スミ + マ ) s NEXTI さ EY(2)=1:B(4)=E(1): 日 ( 巳 )=E ビ (2) : 日 (6) =E (3) 
GUSUB21 1 ヨ 80 

FUR1I さ =2TOB 

IFE(1 さ 3) く >E(1)+1THEN21160 

FURJ さ = エス + 1 T ロ 9 

IFE (3) < >E( エ さ )+1THEN2115O 

IF 1 ユ =2THEN2109O 

FURX=1T ロ HI ミー2:G(X)=E(X 二 1):NEXTX 

ITFJ さ = エ さ +1THEN2111O 

FURX ニ 1 ミー1 T ロ J さ コー ミ :(X) ニ E(X+2) :NEXTX 

IFJ さ =9THENS1 1 さ O 

FURX=J3ー-2T06i 5S(X ) = ニ E(X+ ミ ) : NEXTX 
Y(2)=OEB(4)=E(1) :B() =E( エミ) BE(6) =E(J マ ) 
GUSUB2 1 1 ヨ 0: ゴミ ニワ 9: エス = ニワ 

NEXTJ ミ 

NEXT1 ミ 

RETURN 

IFS( さ ) く >5(1) THENS122O 

FURT4=1TD ミ :R1 (1T4)= ニ (14+ ミ ) :NEXTT4:Y( ミ 3)=1: 日 (7) =5(1 ) : BE( 日 ) = 弓 ( つ ) s (9) = ( さ ) 
BUSUB21 さ プア 0 

FURT4=2T ロ 5 
IFS(I4):S(1)+1THENS135Q 
FURJ4=14+1T ロ 6 

IFS (J4) ミ SS(T4)+1THEN2S1 ミ 4 
IFT4=2THEN21280 
FURX=1TUI4 一 2 ミド 民 1(X)= ニ (X+1):NEXTX 
IFJ4=I4+1THEN21 ミ OO 
FURX=14-1 THJ4- さ :R1(X) =(X+2) :NEXTX 
IFJ4=6THENS132O 

FURX= ゴ 4ー2TU さ :R1(X) ニ 8(X+ ミ ) : NEXTX 
Y( さ ) =Os B(7) =5( 1 ) :B(B)=S(14) :B(9) =5(J4) 
BSUB2 1 370: ゴ 4 ニ 6: 14 ニム 6 
NEXTJ4 

NEXT14 

RETURN 

IFR1 (る ) =R1 (1) THEN2141O 
IFR1(2) く >R1(1)+1THEN21440 
IFR1 (3) く :R1(2)+1THEN2144O 
Y(4)=O: GUTUS1420 

Y(4) =1 
NM=N+1:BE(1O)=R1(1):BE(11)=R1( つ ):E(12)=R1 ( さ ) 
GUSUB2 つ くさ 45O 

RETURN 

* チ ー ト イヴ 

BUSUB2O5BO 

J=0 

FURT=1T ロ 7 

TFH( つ * 1 ) = ニ H( コ * エ ー1 ) THENJ= ニ ゴ +1 
NEXTI 

FUR1=1T06 

TFH( つ * 1 ) =H( つ * エ +1 ) THENJ= ニ ゴー1 
NEXT1 
TIFJ=7THENNM=M+ 1 : BUSUB2 さ 67O 
RETURN 

の か 

BUSUB2O05 ヨ 0 

FURT=1T01 さ 

IFH( 1 ) =H( エ +1 ) THENX=1 : N=O 
NEXTI 

IFN>OTHEN21740 

FURJ=X TO 13:H(J) =H(J+1 ) : NEXTJ 
FURI=1T ロ マミ 

TFH(2* エ ー1 ) =10* エ ー ワ THENN= ニ N+ 1 
TIFH( つ *※T) ニ 10※ エ ー1THENN= ニ N+ 1 
NEXTI 


216 ヨ 8O_ FRI=ZT ロ 1 ミ 

つ 169O 1TFH( T ) ニコ ネエ +17THENN=N+ 1 

217OO_NEXTI 

2171O FDRJ=14TDX+1STEP-1:H(J) =H(Jー1 ) : NEXTJ 

2 っ 1720 IFN=1 ミ THENM=M+ 1 : BHSUB2 ミ フ 70 

21740 RETURN 

21750 メン リ ヒョウ ミト 

2 っ 1755 PRINT" 屋 " 

21760 FURC1=1TD4:FRTINT " 自 証 認 " :: FDRJ 1 = ニ 1 丁 ロミ エニ B (コネ じ 1 一 さ + オ ゴロ 1 ) : GDHSUBSO4705 PRINT" 碧 "51 まき 

21 プ 61 GUSUB さ OOO NEXT ゴ 1: NEXT ビ 1: ゴ 1=1 

21770 iT=B(1 さ ) : GBDSUB2O47O: PRINT "上 認 認 "1 まま 5 BHSUE さ OOO 1= ニ OBDSUB2O470O:PRINT" 硬 "31 まま 5 
: GUSUB3OOO: PRINT "W" 

21771 CURSDRK7*2+((K フ ー1 ) \ さ ) *2+1 4: PRINTNTD$ ("7W モ 8 放 の" 、 7 日 +1 。 7) 

2170 "フュ っ 

21790 IFB(4) = ニ さ ワウ THENF つ = ニ F つ +1: 7 和 ま (1)= ニ Z 生 (1) オリ ウー イ 革 つ か か つり 

218OO_N=O 

21B1O FURX1=1TD4: IFF(1 つ +X1 ) = ワ OTHENN ニ NN+ 1 

21 ヨ 20_ NEXTX1 

2184O IFN=4THENF2= ニ F ビ 2+1sZ 率 (1) 王 Z 和 ま (1)+ す "ズー カコ リリ 

215O IFB(1)<> さ 1THEN2187O 

21B60 IFB(10)= ミ 7THENF2= ニ F2+ つ 7 ま (1)=Z 和 ま (1)+" ヴァ イー"EBDTD21BBO 

21870 IFL (1)+L (さく ) +L (3) +L( ミ 7) >10THENF2=F2+1: 7 も (1) ニ も (1)+" ヨウ スー ジリ 

21BBO IFK(5) >OTHEN21950 

21890 IFY(1)+Y(2) +Y( さ ) +Y(4)<4THEN2195O 

219O0O IFKB=OTHEN2192O 

21910 IFKZ< 1 さ THEN2 1950 

つ 1920 F2 ニ F2+1: Z ま (1)=Z 和 ま (1)+" スー アコ コリ 

219 さ O TFK フ >12THENF フ =F2+1: も (1) =Z ま (1)+" グー キリ 

21950 IFL(47) >1 さ THENF2=F2+1: Z 生 (1) ニ Z ま (1)+" キ コ ロー ト - "= BUTD2214O 

21960 IFH(14) > さ OTHEN22110 

21970 IFK(5) >OTHEN221 10 

21980 IFF(13)+F(14)+F(15) +P(16) >5OTHEN22110 

2199O IFINT(H(1) /10) く >INT(H(14) /10) THEN2211O 

22000 ITFL(1+10*(H(1) ギ 10) ) ※ し (9+10※(H(1) 10) ) < で 9THEN22110 

2201O0 N=O 

22020 FURX 1=1TU9: ITFL(X1+10O※(H(1) キ 1O) ) =OTHENN= ニ 14 

22040 NEXT 

22050 IFN=OTHENF2=F2+1: 7$(1)=Z 生 (1) オリ キュ ー ト レー" 

220860 IFINT(K6 MOD10) =1THEN22100 

22070 IFINT(K6 MOD1O) =9THEN2210O 

22080 IFL(K6) =1THEN22140 

2209O F2=F2+1:Z ま (1)=Z ま (1)+ す "0 9 ッ 2000s GUTUSS14O 

22100 IFL(K6) =4THENF コ =F2+1: 7 も (1) =Z ま も (1)+" 9 メ u ツ = BUTU2214O 

22110 IFL(22)+L (2 う ) +L (24)+L (2 ら ) +L (2 日 ) し (41 ) 1 ス THENF つ = ニ F コ +1 s Z 和 ま (1)= ニ Z 和 (1)+"! リュ ー イ ー ソ リ 
22120 IFH(1)< さ OTHEN22140 

2213O IFH(1 さ ) > さ OTHENF2=F2+1: 7$(1) = ニ Z 和 (1) の ー イ ー ツ " 

22140 IF1I9=14 ANDK 昌 =OTHENF コ =F つ + 1 : IFY フ = ミ 1THENZ$ (1) =Z ま (1)+" テコ ホー"ELSEZ$(1)=Z ま (1)+" 
チー ホ -" 

22145 RETURN 

22150 "フー ノ タイ サコ 

2216O F=2O 

22170 "コー- ウ 

221BO FURX1=1TD4:F4=Oi IFY(X1)=OTHEN2S さ SO 

22200 F4=F4+2 

22210 TFP(12+X1) >9OTHENF4=F4*4 

22220 IFB( さ *X1) >30THENF4=F4*2: GUTU22250 

22230 IFINT(B( さ XX1) MDD10) =9THENF4=F4*%2 

22240 IFINT(B( さ *X1) MUD10) =1THENF4=F4* つ 

22250 IFK(X1)=1THEN22 さ 10 

22260 IF に フ プ く < マ ※X1 一 2THEN223 さ 0Q 

22270 ITFK フ > さ *X 1THEN22 さ OO 

222 ヨ 0 IFKB=OTHEN22 さ OO 

2229O GDTD22 く 1O 

22 さ OO F4=F4*2 

22 さ 1O F ミ =F さ +F4 

22 さ 20 NEXTX1 

2233O 『 ト イヴ 

22 さ 40 IF(B(14) 3 日) THENF ミ ニ F ミ +2 

22350 TIF(B(14)=Y6) THENF ミ = ニ F ラ + ス 

22 さ 6O IFK(B(14)=Y7) THENF さ = ニ F ミ +2 

22 さ 7O "マチ 

22 さ BO ITFKB=OTHENF コ =F マ + っ 

22 さ 90 IFK フ は 12THENF マ = ニ F さ +2: GUTO22440 

22400 X1=INT(K7 MDDS) : X2=INT (EK6 MOD1O) 

22410 YY ニ =Y (に フ ギ さ +1 ) : IFX1= ニ 2 QANDYY=OTHENF ラ = ニ F ミ + コ 

2242O IFX1=O ANDX2= さ THENF さ =F マ +ー 

224 さ O IFX1=1 QANDX2= フ THENF さ =F ミ + 

2244O IFK(55) =O ANDKB=1THENF さ = ニ F ミ +1O 

2245O F4=F さ 

22460 F さ =10*TINT((F さ ー1 )\\10)+10 

22470 RETURN 

2248O * ト フェ っ 
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22490 
225OO 
22510 
2252O0 
225 さ O 
2 っ 254O0 
2255Q0 
2256O 
22570 
22575 
225 ヨ 0 
22590 
22600 
22610 
2262O 
226 さ 0 
22640 
22650 
22660 
22670 
22675 
っ 2 っ 260 
つつ 69O0 
2 っ 2700 
22710 
22720 
227 さ 0 
22740 
2275O 
22 プ 60 
2277O 
22775 
2278O 
22790 
22800 
22 ヨ 10 
2282O 
2 っ 2 日 さ O 
22B4O 
2 っ 25Q 
22B6O 
2287Q 
2288O 
2290 
22900 
22910 
っ 2920 
229 さ 0 
2 っ 940 
2295O 
22960 
22970 
22980 
22990 
2300O 
23O10 
2302O0 
230 さ の 
23040 
23050 
23060 
2307Q0 
2308O0 
23090 
2 さ 100 
2 さ 110 
23120 
2313O0 
2 さ 140 
23150 
2 さ 160 
2317O 
2 さ 1 ヨウ 
2 さ 185 
2 さ 190 
23200 
23210 
23220 
232 さ 0 
23240 
23250 
23260 
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の 
IFKB=OTHEN2253O 
IFY フ = ミ 1 THENF=F2K480Q0Q 1 GHTO2255O 7 リー チ ! 。 2S8g9G 

F5=FS* ネ ス 2OOOI GUTU2255O 円 回 | 

1FY フ = さ 1 THENF6=F2*16000: GHTU2SSSO 

F6=F2* 日 OOOIF フ =FS* ネ 1600O 

IFY フ プア = さ 1 THENF4 オ = ニ F ラ + マ ミ *F6: BHTH2S57O 

F4=F+ ネ F6+F ア 

IF X9=OTHEN22600 
IFX9=3THENYB=F4: BUTH2S59O 
IFF4SSY ヨ BTHENS26Q0O 

BUSUB23 さ さ OI BUSUB2 さ O3O 

RETURN 

だ, 

IFF 1:>9THENFB=6OOOI BUTOU2S6BO 
IFF1 >7THENF ヨ =4000: BHTU226 ヨ 0 

IFF 1 :5THENFB= さ OOOI GUDTUS268BO 
IFF1:4THENF ヨ =2Q000I GHTUS26 ヨ 0 
IFF1=4 QRNDF3: さ 0OTHENFB=2OO0I BHTHSS6BO 
IFF 1= さ ANDF さ :70THENF ヨ =2000 

BUTUS2740 

IFE ヨ =OTHEN2S ア 10 

IFY フ = さ 1 THENF5=6*FBI GUTU22B9O 

F5=4*※F: GHTHS2B ヨ 9O 

IFY7= さ 1 THENF6=2*FBI BHTUSSBO 

Fa=F ヨ :F フ = ニ 2*F ヨ : GHTUS2 ヨ 9O 

し) 1 議 rd 

IFE ヨ =OTHEN22 ヨ 10 
IFY7= さ 1 THEN227BO 

F5=FNF (16) 

ITFF5:BOOOTHENF 紀 =BOQO 

GUTU22 ヨ 9O 

F5=FNF (24 ) 
IFF5:12OOO0THENF=12OO0O 

BUTU2SB9O 

IFY フ = う 1 THEN2SS ヨ 70 

F6=FNF (4) 

F7=FNF () 

IFF6:EOOOTHENF 6= ニ OOO 
*4Q0QOCOTHENF フ =400QO 

BOTUS2B9O 

F6=FNF ( 日 ) 

IFF6:40O00THENF 6=40QQ 

RETURN 

の ネタ ア "ルイ 

X ワ =2sFRINTZ ま (2) 

IF ドド B=OTHENSS96 〇 

IFY フ = さ 1 THENS295O 

PRINT" コ 2 ロウ 馬 和 の リ の リ "SF きす リウ リラ F 1.5 "ファ ニー リタ 5 すり 学 " 5BDTD 妥 

PRINT" オ ヤーン ロニ 了 アカ "リリ リョ F ビ 35 "つづ" ョ F1 5 "ファ - 
IFY7= ミ 1 THENS さ OOO 20 

PRINT" コ ー メ EE アリ り OF35 "の "5F13 " つ タ 5" 

PRINT "オド の カ 208F プ フォ リ す 5" 

PRINT" コ カタ "3FGi "まこ BOTUS3OSO 

PRINT" オ リモ ヤ 〒 れ " fc MAP 

PRINT" コ あい 8F6 ョ "チッ ズリ 

RETURN 

"の マフ チー イヌ プ " ルイ 

PRINTZ ま (1 ) : X ウ = 

IFE ヨ =OTHEN2S308Q 

IFY7= ミ 1THENFRINT"T 和 キー ロ - TTYTD り "sgELSEFRTNT "コー/ ロー ヤリ 8 

FRINTF5i "テー BHTOUS109 

IFY フ = ミ 1 THENFRTINT" 生 ヤー の も モ アカ "リリ"EFRINT" コ カラ 

PRTNT" コ ノ ツモ P カ "リリ "iPRINT リ オヤ カラ "8FZ ョ " テ "sPRINT" コ カカ 

RETURN 

の まう 

BUSUES178O 

IF (F2O) THENBHSUEBSS490: BUDTD232O0O0 

BUSUBSS150: BHSUBS40SOE GHSUBSS610 

IFY7= う 1 THENF 4=F ロ + コ ミル F6* GBDUTUS さ 170 

F4=F ロ + ジ ゼネ F6+F ア プア 

IF (X9=O ) THEN] O 

IF(F4:Y ヨ ) THENS さ 2O0O 

IFF 1=L(Y5) THENM=Oi BDTU23SOO 

GOSUE2 1 750 GUHSUESS90Q 

RETURN 

"あー hd 穫 立 

F2=0) 

GSUBSP12O 

IFF2=O_ THEN23260 

BUSUB22490: BHTUS さ さ 10 

BUSUES4700: GUSUESS610 


5sF65 "テー ュー タリ リョ BODTH2 さ 100 


っ つ さ つ ア 0 【FY フ = さ 1 THENF4 オ ニ F5+ さ *F6: GHT ロ 2 さ 290 

2 つ さ 2BO F4 オ = ニ F5 ロ + コ *F ム 6+F プ 

2 さ 290 IFX9=OTHEN2 さ さ 10 

2 くさ OO IF(F4=YB) THENBDSUB2 つ 3 さ 20: BUSUB22900 

2 ささ 10 RETURN 

2 ささ 20 PRINT" 屋 ":FDRC1=1TD7:PRTINT" 較 "』 ェ FDRJ1=1TD2: エニ =B(2* ビ 1 ) : BHSUB20470PRTNT" 硬 " ま 1 第 
3 : GHSUB さ OOOE NEXTJ1:NEXTC1:PRINTEPRINT "一 騙 " ぶ 

2 ささ 21 CURSDR に フネ 2+( (に フー1 ) \ さ ) * つ +1 。4: PRINTMTD ま (「 放 きり BE オ 攻 1 攻 を" 。 フネ に B+1 。 プ ) : RETURN 
っ ささ さ O_ PRINT" 屋 ": GDHSUB2O5 ヨ O: FURJ 1=1T ロ 14: エ =H(T1 ) : GHSUB2O0470I FRTNT" 大"* ゴ 1 も s :BHSUB さ 000 
s NEXTJ1:PRINTEPRINT "本 騙 " 

2 くさ さ 1 CURSDRK7* つ 。4:PRINTMTD も ("きり BE モネ 用 1 胡 キュ フネ に 日 +1 。 ア ) : RETURN 
23450 ヒトリ / アテ ア が リリ 

23460 FDRX1=1TD4: に K(X1)=OINEXT 

2 くさ 470 FURX2=1TO4 

2 さ 4BO TFP( さ *X コ ー2) =OTHENX2=4: X1= ニ 0 GBDTU2 つ さら 56OELSEX 1 = ニ 4 

2 さ 490 FRX さ =1T ロ 4 

2 つ さ 5OO TIF(P( さ \X つ ー ク ) 一 日 ( さ ネ X さ ー) ) 4 つ +(P( さ *X フ ー1 ) 一 BB( さ *X さ ー1 ) ) 1 ご = ニ OTHENX 1= ニ 0 X4 ニ X さ 3 X さ = 
2 さ 510 NEXTX さ 

2 さ 3520 IFX1 >OTHENM=Mー 1 : X フ =4: BDTH2 さ 560 

2 さ 5 さ 0 P(16+X4) = ニ X2 

23540 IFP(12+X2)=100THENS3560 

23550 K(X4)=1 

23560 NEXTX2 

2357O IFX1 >0THEN2 さ 660 

2358O K(55) = に (1) +K(2)+ に K( う ) +K(4) 

2 さ 590 FOURX ヨ =1T ロ 1 さ 

2 さ 6OO IFX ワ =2THENXB=1 さ : BUTD2 さ 65O 

2 さ 610 IF(B(X) く >K6) THEN2 さ 6 さ O 

2 さ 620 K7 フ =X 日 :F 1= ニ 0:F コ = ニ 0: F ミ = ニ 0:F4= ニ OF ロニ DsF6= モ OsF ブ =OFB= ニ Oi BUHSUB2 さ 1 10 
2 さ 6 さ O IF(F4>=X ア ) THENX7 ア =F4 

2 さる 640 Z ま (2)=" "EZ まま (1)= ニ リリ 

2365O NEXTX8 

2 る 66O_ RETURN 

2 さく 67O0 "チート イリ ト フ ウェー 

2 さ 68O_ FURX1=1TD14:B(X1)=H(X1):NEXT 

2 つ さ 690 F1= ニ つ :F コ =O0: F さ = ニ 25* ロニ 0 ょ F6=O ミ F ア = テニ 0 ミ FRTNT 

2 さる 700 。Z ま (1)=Z ま (1)+" キー トイ ヴ ウリ" ョ ア 和 (で) ニ Z 生 ま (ご) オリ キー トイ リリ 

23720 GUSUB2S さ 210 

23730 ITFY7= さ 1THENF 4=F ロ + ミ *F6: BUTU2 う 750 

23740 F4= ニ F コ +*F6+F フ プア 

2 さ 750 IF(F4>=X7) THENX7=F4 

23760 7Z ま (2 つ )="" ミ Z 和 も (1)=" リ "ERETURN 

ググ OD その / kk グ ま か 

2 さ 7BO F1=O=F つ =1 : 上 さ = ニ Os F ロ ニー ロ DF6 ら = ニ ウ *F フ = テロ メニ ロ 

2 さく 790 FURX 1=1T ロ 14:B(X1 ) =H(X1 ) 

23BOO IFB(X1)=K に 6THENX つ = ニ X+1 

23 ヨ 10 NEXTX1 

23B2O PRINT 

23B さ O 7Z ま (1)=Z 和 ま (1)+ す リコ フリ 

23 昌 40 1FX2=2THENF2= ニ F2+1: Z 生 (1 ) = ニ Z 和 も (1) すり 1 ス メ ー マ キリ 

23B5O _X9= さ : BUSUB2249O0 

2 さる 昌 6O IFY フ = ミ 1 THENF 4 オニ F ロ + ユ *※F6: GHTUS さ ヨ ヨ 0 

2 る 3 日 7O0 F4=F5 ラ + ネ F6+F ア 

23 ヨ 0 IF(F4>=X ア ) THENX フ =F4 

23890 7Z ま (1)= リ "EZ まま (2)=" "ERETURN 

24020 "フリ ウ ヤ フ 

240 さ O Y(5) =Y(1)+Y(2 つ )+Y ( さ ) +Y (4) 

24040 IFK(5) >OTHEN24110 

2405O IFKB=O _RNDF4=22THENF さ =20:F1= ニ F1+1: 7 ま (2)= ニ Z ま (2)+ キ リヒ 5 つつ フリ 
24060 IFKB=1 QANDF さ = さ OTHENF 1 =F 1+1: Z も ( つ ) = ニ Z ま (2) キ オリ に 5 コリ 

2407O IFY(5) =O QNDB( 1 ) =B(4) QRNDB(7) =B(10) THENF 1 = ニ F 1+ さ : 7 本 (2 つ )= ニ Z 生 (2)+ リ リャ つ へ " - コ "5BDTOD 
24160 

24OBO FURX 1=1T ロ さる 

24090 IFB( さ *X12) =B( ネ *X1+1) ANDY(X1)+Y(X1+1)=OTHENF1=F1+11Z ま (で )=Z 生 (2) キ リー イー の - コ リョ 
X1= さ 

24100_ NEXTX1 

24110 IFL(Y6) >2THENF 1=F1+1 3 Z ま ( つ )=Z 和 も ( つ )+ す "FT イリ 

24120 IFL(Y7) >:2THENF 1 =F 1+1 =: 2 本 (2) = ニ Z 和 も (2) す "PT" 

2413O FURX1= ニ ミウ TH43STEF 

24140 IFL(X1) >2THENF 1 = ニ F 1+1: Z 生 (2) ニ Z 生 (2G) す "FT" 

24150_ NEXTX1 

2416O FURX1=1TU4: X4=O: FURX2=1TH さ : X さ = (さま X1 一 コキ X つ ) 

24170 GUSUEB242 ヨ 0: NEXTX2 

2418O IFX4=OTHENX 1= ニ 4: X コ = ニ OELSEX=4 

24190 NEXTX1 

24200 IFX2=OTHEN24 さ 10 

24210 X4=O: X さ =B(1 る ) : GHSUB242 ヨ 0 

24220 IFX4=OTHEN24 る 10 

2423O IFY(5) =4THEN24 さ 10 

2424O TIFL(49) >OTHENF 1 = ニ F1+1 : Z 和 ま ( つ ) ニア Z 和 ま ( で ) 二 "ホコ キャ ニー プリ"sBHTH24260 
24250 F1=F1+2 つ :Z ま も ( つ )= ニ Z 和 も (2) キ リー ミド ュー キャ 

24260 IFK(5) =OTHENF 1 =F 1 +1 
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24270 BUTU24 さ 10 

2428O0 "ヤオ チュ - 

2429O TITFX さ > さ ODRINT(X さ MOUD1O) =9UR(X さ MUD1O)= ニ 1THENX4 ニ X4+1 

24 さ OO RETURN 

24 さ 1O RESTURE24 る 9O 

24 さ 20 FURX4=1TO ロ 4 

24 さ さ O_RERDX 1 。 X2。 X さ 

24 さ 4O IFINT(B(X1) MHD1O)=1 QANDB(X2)=B(X1)+ さ 3 QNDB(X さ ) =B(X2)+ さ ANDFNY (O) =OTHENX4=4 
: X1=O 

243 さ 5O_NEXTX4 

24 さ 360 IFX1>OTHEN24400 

24 さ 70 F1=F1+1:Z ま (2 つ )= ニ Z 和 も (2) キリ fg 間 ー リ 

2438O IFK(5) =OTHENF 1 = ニ F 1+1 

2439O DRTR1。4 ょ 7。1。4。1O。1。7。10。4。7。1O 

24400 RESTURE24 さ 90 

2441O FURX4=1TD4 

24420 READX1 。X2。X さ 

2443O IFB(X2)=B(X1)+1O ANDB(X さ 3) =B(X2)+10 _RNDFNY(O) =OTHENF 1=F 1+1: 7 も (2)= ニ Z ま (2)+" サコ 
ショ "5 X4=4ELSE24450 

24440 IFK(5) =OTHENF 1=F 1+1 

2445O_ NEXTX4 

2446O IFY (5)= ニ 4THENF 1 ニ F 1+ つ = Z 生 (づつ ) ニ 本 ( つ ) キ リー トイ トイ リ 

24470 X2=O 

2448BO FURX1=1TO4 

24490 IFF(12+X1 ) >99THENX ご = ニ X つ +1 

2450O NEXTX1 

24510 IFX2=3THENF 1 =F 1+ つ :Z ま (2 つ ) ニア も ( つ ) す リサコ カ つ リリ 

24520 RESTURE24390 

2453O_ FURX4=1TD4 

24540_ READX 1 』。 X つ 。X さ 

2455O IFFNY(O) く > さ DRK((X1+ つ ) / さ )+ に ((X2 ォ 2) / さ )+ に ( (X さ + つ ) / さ ) エ >OTHEN24620 

2456O IFK コ =OTHEN24610 

2457O_ FURX5=1T0 ミ 

245 ヨ 0 X6= ニ に ブフ + マ さ #XーX ロ 

24590 TIFX6= ニ さ #X1 URX6= ニ ユネ ※X つ HRX6 ら = ニュ %*X ミ THENX6 ら =0i X ニ さ 

24600 NEXTX5 

2461O F1= ニ F1+ つ =:Z ま ( つ ) ニ Z ま ( つ ) す "リサ アコ "= X メ 4 ニオ 4 

24620_ NEXTX4 

246 さ O TIFL (3)+ し (41)+ し (4 う 3) : フ THENF 1 ニ F 1 ミア 和 ま ( つ ) ニア Z 和 ま ( つ ) す の ミミ ョ ー サ amT cms BDTD247OO 
24640_ RESTURE24 さ 0 

2465O FURX4=1TO4 

24660_ READX 1 。 X つ 。X さ 

24670 IFFNY(0) く > さ THEN24690 

2468O IFINT(B(X1) MOUD10)=INT (BE(XS) MOUD10) NDINT (BE(XS) MHD1O)=INT(B(X さ ) MOD1O) 人 
NDB(X さ ) く < さ O THENF 1 = ニ F 1 = ミ 7 も (で) ニ Z ま も ( 三 ) 二 人生 ココ ョ フト "の 5 コリ 

2469O_ NEXTX4 

24700 "フリ ウ ヤ フ ( チ ー ト イ ウ ) 

2471O IFK( 弓 ) + に =OTHENF 1= ニ F1+1: ア 和 ま ( つ ) ニ Z 生 (づつ ) す の モリ 

2 つ 4715 IFI9= う 1 THENF1=F1+1 =: Z 和 も (で) 三 Z 和 も (づつ ) す 0 NT キイ 

24720 IFL(47)+L(49) =OTHENF 1 = ニ F 1 1 : ア ま (ご で) ニア 季 ( つ ) す "リヴ コギ ヤオ キリ 

24725 IF に K9=1 QANDRI=14THENF 1 ニ F 1+2: 2 も (G) ニ Z ま も (G)+ キ " ワーフ コリー"sGBHTU24740 

2473O0 IFK9=1THENF 1=F1+1:Z 和 も (ご ) ニ Z ま (G)+" リー- キ "ELSE ご 4740 

24740 IFL(Y5) >OTHENF 1 =F 1 +L (Y) : 7 も (2) ニ Z 和 も (2)+ キ リト "コリ"+STR も (し L(Y5) ) 

24745 IF に EK9=1 QANDL(Y4) :OTHENF 1=F1+L(Y4) :Z ま (2) ニ Z ま ( つ )+ リ の ウラ ト " うり"+STR ま (L(Y4) ) 

24750 TIFL(47) +L(49) >1 さ THENF 1 = ニ F 1 キオ つ ミ Z も ( つ )= ニ Z 和 も ( つ ) す " ホコ ロー トド トー" 

2476O FURX1=1T ロ ミユ 

2477O IFL(49+2*※X1)+ し (49) 1 さ QRNDL(49) :OTHENF 1 ニ F 1+ つ :Z 和 ま (G) =Z 和 ま ( つ ) す " ホコ イキ "ELSE24BOO 
247 ヨ O IFE ( 弓 ) =OTHENF 1 = ニ F 1+1 

24790 X1= さ 

24 ヨ 00 NEXTX1 

24B10 FURX 1=1T ロ ミュ 

24 ヨ 20 IFL(49+2*X1) 13THENF 1 ニ F 1 + ロ = Z ま (ご ) ニア ま (2)+ キ "キイ キ "ELSE248B4O 

24 さ OX1= さ =: IFE ( 呈 ) =OTHENF 1 =F 1 +1 

24840 NEXTX1 

24 ヨ 5O_RETURN 

さ 3OO1O0 "イフ 

3002O_PRTINT" 層 ": R 和 ま "リョ Y ワ ニ Y 日 

3003O CURSUR さ 。10:PRINT "イマ ./ キョ フ ヲ モコ イリ カイ ミ マ マカ Y/N" 人 ま ニ INEEY 員 

さ 0040 IF( 人 も ="Y") THENSQO05OELSEIF (内 も ="N") THENSQO041ELSE3Q00 さ 0 

3 さ 0041 CURSUR さ 。 10: PRINT "ソレ エリ イマ で ー/ キョ フ ヲ モウ イッ カイ ヤリ コス カー Y/N" 3 人生 =INKEY ま 

さ 0042 ITFA も ="Y"THENMQ=1 : GHTH3O410ELSETF ま も ="N" THEN3O04 ミ ELSE さ OO4 1 

さき OO43 CURSUR さ 。10:PRINT "ソレ エキ ドル の ま " // ま ョ フワ へ ヌ カ Y/N" siSBFC(4) : 人 まま ニ INEEY ま も 

さ 0044 IFA も ="Y"THENCURSHR さ 。10:FRINTSFC (9) : MS BHTH3O410ELSETF 人 まま ="N" THENMQ=Oi GUT 
03O4 1OELSE さ OO4 ミ 

さき OO5O_ PRTINT" 属 "=sFUR エ = ニ 1T ロ 1 ス =H4 (1 )= ニ ロロ (4* ネ エー1 ) = 日 ( エ ) = 人 (4※1) :NEXTT:H(14)= ニ 4 弓 : GUSUB2O5BO 
さ 0055 CURSHR さ 。 10:FRTNT "fg イー T ウ カイ トメ マミ カカ Y/N" = 則 和 ま =TNKEY も = TF 人 も =" "THEN さ OO 

さき さ QO056 TF ま ="N"THENTM=1ELSE IF まま ="Y"THENTM=OELSE さ CO55 

さ 0057 FRINT" 屋 " 

3 さ QO6O_CURSURO。2OsFUR エ =1TUD1 さ EFRTINT" "CEHR ま (64+ エ T) isNEXTTE CURSHR1H』 19i FRTNT "EN ュ コメ リ ミ 
CURSUR さ 3 さ 』 20:FRINT "9 モー N"ECURSOR1.0E FRTNT "アイ キ " ュ CURSOR 1 。 5: PR INT "コテ エル 7T "5 エロ = ニ 0: ミ エ 6=Os に 9 
=Os CURSUR2。 19: PRKTNT " モ キ 〒 ェ キー" ミ F( 人 4) 一 Y ワ ミリ キリ 

3O065 CURSURO。 19:FRINTMID ま (リト コー ナー 。G※((F ( 弓 ) 一 1 )\4)+1。 つ ) ョ F() 一 4*((F( 王 )ー1) ギ 4) 5 "キョ ブフ リョ 
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CURS ロ R10。 19:PRINTMID ま も ("トコ ナコ ジャ スイ リュ コネ B+1 。 つ ) 3 ケリ 
3OO66 CURSDR10。 13:PRINT" ト " う ヒョウ トー ハイ "ミミ 1=1: エニ (1 さ 1 ) : GBDSUB2O0470: PRINT" 硬 " ま 1 まま ョ BOD 
SUBSooO 

30067 CURSDR1 ,O:PRINTMID ま ("トコ ナ コ p ャ ヘイ リュ BK ( 1) * ネ G+1。2) 5" ケリ EEURSDR25 0: PRINT "モチ テ つ " ョ F(1 
) +Y9 ョ "チリ 

さ OO7 プ OX ニ ー2 ミ = Y=21:FURJ 1=1TOU1 さ = X ニ X+Ss GBDSUB5O1O NEXTJ1 

さ O12O0 FURI9=14T ロ さ 1 

さ O1 さ O CURSDR 14』19:PRINTT9ー1 さ 

3O14O H(14)= 人 (1T9*4) : CURSDR さ 5。 つ 1 : エニ H(14) :J1=1 : BDSUB2O470:PRINT" "1 まま 人 リリ 
3O145 BUSUB さ OOO 

3 さ O19O IFTM=1THENFURI=1TU5000: NEXT: BDTD30220 

さ 30200 CURSOR 1 。 18: PRINT "人 サキ へ イ ウ キー イイ エキ" スカ (Y) "iQ ま =INKEY$ ま : IF も =" "THEN30200 

30210 IF まく >"Y"THEN さ O200 

3 さ 0215 CURSOR1 。 1 日 : PRINTSPC(20) 

さ O22O0 ST=5ST( 1) :s IFS5T=1OOTHENCURSURO。1 1 :PRINT "9 ゆ モ 1 10sSFPC(10) : Y ヨ =O: KB ヨコ =Os GDBUB2OO10* 
ェ 9= さ 1 : G ロ T ロ さ O さ 9O 

さ O2 さ O SMQPH( 14) 。H(ST) 

さ O24O 1B= ニ つ * エ 9 ヴー2 日 : 1 プ = ら 6: IF(19=14) THENJ1= ニ 1ELSEJ 1 =O 

さ O25O IFST=14THEN CURSUR さ 5。21:PRINT" 恩 "is: BHTU3Q30O 

30260 IFST<1 さ QRNDST > 1THENCURSDR 2*ST-2。21:PRINT "-。 HE 攻 沼 康 | 1 明 計数 | 本 受 朗 2 ts:BDTD3O 
300 

30270 IFST=1THENCURSDRO』21:PRINT" 放 党委 3 攻 党 数 上 放 茹 数 "jiEBUTH さ O3OO 

さ O2 ヨ O ITFST=1 る THENCURSHR24、 つ 1:FRINT"-  B 営 | 要 朗 5) "i:GUT ロ さ O さ OO 

3O29O CURSDR さ ら 616:s PRTNT" 下 8 3 

さ O さ OO _CURSOR エ TI 日 。 エ フミ FRINT" Ks 認 ":: エ = ニ H ロ (14) : GUHSUBSO470E FRINTJ1 ま 』 

さ O さ OQ1 BUSUE さ OOQOE H(15) = ニ H(14) =:H(14) ニ 4 弓 : IF (1 ワ =RT+1) THENEULUR プ で CURSDR TI は, 17 フミ PRINT "一 
IE 8 攻 " COLOR ア OO 

3 さ O さ 3O2 IFST=14THEN3O さ さ O 

3 る 0 さ 10 GUSUB205 ヨ O 

3 さ O さ 20 X= ニ ー2= Y=21 :FURJ1=1TD1 マ : メニ X+ つ 5 BHSUB5O10: NEXTJ1 

3 さ 0O さ さ O CURSOUR さ 5。21:FRINT" 到 IF 

3O35O IF (RT=19) THEN ド 9=1 : CURSDRO 。 1 1 :FRINT "リー キ !"*SBFC(1 日 ) :FDR エ =1TD5OOOI NEXT: CURSDRT 
1 エフ: CHLUR フ ア ェ っ: PRINT" 。 屋 表 "3J1 ま :CHLUR ア 、O 

さ O さ 6O T6=16+ 1 =: 1 日 ニ つ * 1 ら ー つ = エフ = ニ 1 = IF(15 ロ = ニ O ) THENJ 1 = 1 : 1 ラニ 1ELSEJ 1 =Q 

さ O さ 61 に ド に E=1 :H4(14) =H(155) 

る 0O さ 62 ITF(RD1=19) THENCURSUR5、O PRTNT" ロ | "EEB ニ 1:FURT=1T ロ 14: 昌 (1 ) =H4(1) :NEXT1=Y フ =BK 
( 1 ) * コ + ミ 1 : に 9= ド 9( 1 ) : GBHSUB2OO10: 19= さ 1 : GUT ロ さ 0 ミ 90 

3036 さ H4(14)=Q(19*4ー1 ) 

3 さ 0364 IFST1(19)=100THENCURSUR5。 Os PRTNT" ゆ モ ! "EEB= ニ OrFURT=1T ロ 14:H(T)=H4(1) :NEXTY7= 
BK ( 1 ) * つ + さ 1 : に 9= ド 9( 1 ) : GHSUBSOO10: 19= さ 1 : BHTO さ 0O コ 9O 

さ OQ さ 7O_H4(14)= 人 (19*4ー1 ) : GMRQFHH4 (14) 。H4 (GT1 (19) ) : ユニ H4 (14) : BHSUE2O47Os IF (RI (1)= ニ 19) TH 
ENCURSUR。 Ok FRINT" リ - キ "CULOR ア 。 

さ O ミ ネフ 1 CURSDRTB。T7 ミ FRINTJ1 ま 3 EDLDR フ ュ ェ OBHSUB さ OOO TF ( エ ワ =RT エ (1)+1 ) THENCDLUR7 。 2 CURSDR 
1 日 。17sFRINT "主要 上": COLUR ア ェ 

303BO TIF(RD=19) THENH( 14) =H4(14) : ド RB= ニ 1 : CEURSDRO・11:PRTNT "ロー 1 1" Y 昌 =D: BUDSUB2OO10: 19= さ 
1 : GUT さ 0 さ 9O 

30O39O NEXT19 

303 さ 91 TFCHU >OTHENCURSDR15。 10: FRTNT" フ リエ ニュ キョ コ ホ " 11"s BUT ロ さ O404 

さ 0 さ 92 ITFM=ー1 THENCURSOR1 呈 。 10: PRINT "キョ ニー ホ " 1 1 "BHTU さ O404 

30394 TFCHD1 >OTHENCURSUR15。10: PRTNT "フリ エー キョ ニコ ホ " "5 BDTH さ 0O404 

さ O40O IFM=OTHENCURSOR 1 10: PRINT "リュ コキ ョ フ " = CURSHRO。14:FRINT "アイ テー/ テリ" ミ H4(14) =4 コ : GS 
UB7OOO X ニ ー2 ェ Y= ニ 15: FDRJ1=1TD1 さ = メニ X+Ss GBDSUBBO10: NEXTJ1: CEURSDR22。 15:PRTINT " 十 一 上 " FR エニ 
1T010000: NEXT 

3O404 FDRT=1T ロ SOOOO NEXT 

ュ O040 BHT ロミ さ QQ2O 

3041O Y 昌 = ニ Y9: RETURN 
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いろ いろ な パソ コン 雑誌 を 見 て も わか る 
と お り , 多く の パソ コン マニ ア が 自分 で プ 
ログ ラム を 作り , 投稿 する よう に な っ て き 
まし た 。 年 表 層 を 見 て みる と, 高 年 齢 (30 
蔵 以 上 を パソ コン 界 で は こう 呼ぶ そう で す ) 
の 人 た だ ちの 健闘 も 目立つ よう で は あり ます 
が , 主流 は ゲー ム フ ァ ン の 10 代 半ば の 人 た 
ちの よう で す 。 

中 高生 の 人 た ちの 作っ た ゲー ム は テク ニ 
ッ ク 的 に は か な り レ ベル が 高く 。 す ご いと 
目 を 見 は る よう な も の も 少な く あ り ま せん 。 
また , アル ゴリ ズム を 考え る 際 の 論理 的 思 
考 は 教育 的 に も 将来 大 き 〈 役 立つ こと は ま 
ちがい な いで し ょ う 。 こ れ は 理系 に 進む か 
ら な ど と いう こと に は 関係 な いこ と で す 。 

と ころ で , その よう な 若い 人 た ちの 取り 
上 げ る ゲー ム の 題 材 は 反射 神経 型 の も の が 
多く, 一 部 に は つい て 行け な か っ た り , も 
の 足り な 〈 く 思う 人 が いた こと も 事実 で す 。 

若い 人 が ゲー ム を 作る 典型 的 な パタ ー ン 
の ひと つ は 次 の よう な も の で し ょ う 。 高 2 
の 山田 君 は TV ゲー ム が 好き で 毎日 の よう 
に ゲー ムセン ター に 通っ て いま す 。 友 人 の 
鈴木 用 も 同じ よう な ゲー ム 狂 で いつ も ハイ 


スコ ア を 競い 合っ て いま す 。 ス コア と いう 
も の は や る 回 数 が 多けれ ば 多い ほど 上 が る 
も の で す 。 し か し 当然 の こと な が ら お 人 金 が 
そん な に 続く わけ が あり ませ ん 。 そこで 山 
田 君 は 考え た の で す 。 

「 家 の パソ ュ ン で あの TV ゲー ム に 似 た よ 
うな も の を 作れ ば 100 円 払わ な いで 何 度 も 
ゲー ム が で きる 」 と 。 

これ は 単なる 一 例 で す が , 案外 この よう 
な タイ プ は 多い と 思わ れ ま す 。 結果 と し て 
パッ ツ コ ン 用 の ゲー ム も ゲー ムセン ター に あ 
る TV ゲー ム を マネ し た り 改 良し た り し た 
も の が 主流 と な っ て いま す 。 一 方 ゲー ム モ 
ンタ ー に ある TV ゲー ム に は 本 質 的 に 大 き 
な 制限 が か けら れ て いま す 。 つ まり 「100 円 
だ け で 何 十 分 も ネバ る 人 続出 の アカ ツキ に 
は 倒産 が 待っ て いる 」 と いう こと で す 。 し 
だ た が っ て ゲー ム マ シン 用 に は ,。 プ レイ ヤー 
に 考え る 時 間 を 持た せな い イ ン ペ ベー ダー や 
パッ クマ ン 式 の 反射 神経 型 の も の が 開発 き 
れ て きだ わけ な の で す 。 

お 待た せい だ し まし た 。 こ こ で つい に メ 
イン ゲス ト の アド ベン チャ ー ゲ ー ム が 登場 
する の で す 。 残 念 ながら この タイ プ の ゲー 
ム は , 遊び に な ける オリ ジ ナ リティ で は 特 
に ピカ イチ の アメ リカ で 生ま れ だ も の な の 
で す 。 アドベンチャー ゲー ム は , 作者 の 創 
造 し た スト ー リ ー か ら 成 り 立つ 世界 を . プ 
レイ ヤー が キー ボー ド と 画面 (と 効果 音 ) 
に より 体験 する と いう も の で , 娯楽 の レベ 
ル と し て も か な り 高 水準 に ある と 思い ます 。 
基本 的 に は キー ボー ド か ら プ レイ ヤー 自 
身 の と る 行動 を , 文章 (動詞 士 名詞) の 形 
で 入力 し , その 結果 が 文章 に より 画面 に 表 
示 る れる と いう 型式 を 持つ も の で す 。 

すぐ で れ た アド ベン チャ ー ゲ ー ム は アメ リ 


カ の 名 パッ コン で ある .APPLE 用 に 数 多く 
作ら れ て いま る 最近 で は 基本 的 な タイ プ に 
多く (の バリ エー ショ ン が 付け 加え られ て きる 
ら に 味わい 深い も の が 数 多く 登場 し て きま 
し た 。 注 目 す べき 特徴 を 次 に 示し て み ま し 


流行 の コン ピュ ー タ グラ フィ ックス 的 な 
要素 を 取り 入れ て , 見 る だ け で も 楽し いも 
の が あり ます 。 だ ただ だし, 一 画面 作る の に 何 
十分 も 待た され だり , スト ー リ ー が お ろ を そ 
か に な っ て し まわ な いよ う 注 意 し な けれ ば 
な り ま せん 。 テ ー プ ベース で は あま り 5 画面 
ば か り に 力 を 入れ すぎ な い ほ う が よ いで し 


思考 型 た いっ て も 時 間 が た つ に つれ て 状 
況 が 変わ っ て いく 《 も の も あり ます 。 ま た 敵 
が 出 て き て 反射 ゲー ム の よう に 攻撃 し た り 
逃げ た りす る も の も 出 て きま し た 。 


答え が 一 通り は 決ま っ て いて , ナツ 解き 

の よう に 一 本 道 を 進ん を どい く と いう タイ プ 
の ゲー ム も や り 始 め た ら や め ら れ な いと い 
う 尊 力 を 持っ て いま す が , いろ いろ な 道筋 
が 考え られ る と いう タイ プ も それ 以上 の 魅 
力 が ある と 言え まし ょ う 。 こ れ は 。 デ プレ イ 
ヤー ご と に それ な り の 解答 が 引き 出さ れ て 
いく も の で , いっ だ ん ひと つの ゴー ル ま で い 
っ て も , あき る こと は な いと いう 大 き な 特 
徴 が あり ます 。 


MZ や X 1 で どの よう な アド ベン チャ ー 


アド ベン チャ ー ワ ー ル ド べ の 招待 /? 


| 


ゲー ム が 楽し め ゆる の か , は た まだ た どう や っ 
て アド ベン チャ ー ゲ ー ム を 作る か な ども ト 
ライ する つも り で す が , 今回 は アド ベン チ 
ャ ー ゲ ー ム を 実際 に どの よう に し て 楽し な 
の か (実は 苦し ん で いる ) を 紹介 し ます 。 


今回 私 が アタ ッ ク し た の は マイ クロ キャ 
ビン の 出し て いる 『 ド リー ムラ ンド 』」 と い 
う ア ド ベ ンチ ャ ー ゲ ー ム で す 。 これ を 選ん 
だ 理由 は まわ り の 人 た ちの 評価 が 高く , 確 
か に 客観 的 に みて も 完成 度 が 高い と 思わ れ 
だ た から です 。 

この ゲー ム は 何と フロ ッ ピ ー デ ィ ス ケッ 
ト 2 枚 に わた っ て 入っ て お り , これ ほど の 
大 作 は 今 ま で に ちょ っ と 見 た こと が な い は ほ 
ど で す (も ちろ ん APPLE 用 で は 化け 物 の 
よう な も の も あり ます が )。 値 段 も 内 容 だ け 
の こと は あり , 12,800 円 と 一 見 高 を うに 思 
われ ます が , 熱中 で きる 性 格 の 人 は けっ し 
て 後悔 し な いと 思い ます 。 残念 な が ら 機 種 
は MZ-2000 用 と MZ-80B 用 が 用 意 さ れ て 
いる だ け で す (PC 用 は 開発 中 ) 。 


ゲー ム が スタ ー ト する と タイ トル と お だ 
や か な 丘 の 風景 が 表示 され ます 。 い か に も 
ノン ビリ し た 景色 で す 。 キ ー を 押す と 新 し 
く ゲ ー ム を 始め る か , ある い は 途中 か ら 再 
開 す る か を 聞い て きま す 。 ア ド ベ ンチ ャ ー 
ゲー ム で は 『 今 日 は も う ア カン / また 明 
日 続き を や っ た ろう 』 と いう こと は し ょ っ 
ちゅ うな の で , いっ た と ころ まで を を その ま 
ま 記録 し て 刀 い て , 別 の 日 に や り 直 す 機 能 
は 必要 不可 欠 な も の な の で す 。 

いよ いよ 開始 。 画 面 に 家 が 見 えま す 。 
OPEN DOOR 
と 入力 し て ドア を 開き , 

ENTER HOUSE 
で 家 の 中 に 入る の は 誰 で も や り ま す 。 待 て 
よ 。 前 作 の 『 ミ ステ リー ハウ ス 」 (APPLE 
用 と は 別 の 物 ) の 印象 に 振り 回 され て は い 
け な い の だ 。 で も と りあ ぇ ず 中 に 入り まし 
ッッ 
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東 に 行く 
西 に 行く 
南 に 行く 
北 に 行く 
E だ 
下 に 行く 
買う 

CATCH つか まえ る 

CLIMB 登る 

CLOSE 閉め る 

DRINK 飲む 

EAT 食べ る 

ENTER 入る 

GET 手 に 入れ る 

GIVE 与え る 

INSERT 入れ る 

LEAVE 去る 

LIGHT 火 を つけ る 

。 LOOK 見 る 

MAKE 作る 

MOVE 

OPEN 開く 

OUT 出る 

PLAY 

RIDE 乗る 

RUN 走る 

SEARCH 

SET 置く 

SWIM 

TAKE 取る 

TALK 話す 

THROW 投げ る 

TIE 結ぶ 

UNLOCK か ぎ を あけ る 

USE 使う 


BEAR 
BOTTLE 
CAGE 
CARROT 
CAT 
CAVE 
CHAIR 
CHISEL 
CLIFF 
CLOCK 
COIN 
CUP 
DOOR 
FIREPLACE 
FLAG 
FLUTE 
HAMMER ・ 
HOLE 
HOUSE 
INVENTORY 
JUICE 
KEY 
MAP 
MEDICINE 
MOUSE 
RABBIT 
RAFT 
ROCK 
ROPE 
SEA 
TICkET 
TRAIN 
TREE 
WINDOW 


⑥ 注 意 : (必要 十分 ) =( こ の 表 ) x80%% 二 1 


に 二 
びん 
か ご (おり) 


持ち 物 (を 見 る ) 
ジュ ー ス 

か ぎ 

地図 


移動 は 方 角 で 入力 し ます 。 こ の 場合 は 省 
略 形 が 使え て 。 た と えば 北 へ 行く (GO NO 


. RTH) 場合 は , N を 入力 する だ け で よい の 


で す 。 こ の よう な 省略 形 は , マイ クロ キャ 
ビン の シリ ー ズ で は N,。 S, EE, W の ほか 
に は 上 へ 行く (GO UP) と 下 へ 行く (GO 
DOWN) の U と D が 使え る よう で す 。 

家 に 入っ て 右側 の 部 屋 に は 小さき な ね ずみ 


. 


は Me ? 生 


が いま す 。 ア ド ベ ペン チャー ゲー ム で は , あ 
きま し いよ ょ う で す が と に か く 何 で も GET 
や TAKE で 自分 の も の に し て し まう の が 
基本 な の で す が ,。 どう や っ て も つか まえ る 
こと が で き な い よう な の で ', 別 の 部 屋 に 行 

《 と ダン ロ (の よう な も の ) と いす が あり 
ます 。 こ こ で USE や SEARCH や ゃ SIT 
な ど を 入力 し て みた の で す が ど うに も し よ 
う が な る そう で す 。 

スッ キリ し な いけ れ ど も 一 応 紙 に 見 取 図 
を 書い て 家 を 出 ます 。 家 の 外 に 小さ な オリ 
の よう な も の が あり ます 。 な る ほど , これ 
が あれ ば …… と いう わけ で これ を 取っ て か 
ら 再 び 家 の 中 へ 戻り ます 。 

家 か ら は 道 が 伸び て いま す 。 少 し ずつ 枝 
分 か れ し て いろ いろ あり ます が , 比較 的 簡 
単に クリ ア ( あ と の 泥沼 に 比べ れ ば の 話 ) 。 
何事 も 素直 に 考え れ ば 解決 する の で す , と 
言い た い 。 

ディ スケ ッ ト の 1 枚 目 は スタ ー ト 地点 を 
含む 地域 一 帯 を カバ ー し て いる の で す が , 
ちょ っ と し た 将 関 は 2 つ 。 ま ず ひ と つめ は 
ずっ と 北 の ほ う の つ き あ た り に ある 細長 い 
家 で す 。 家 に 入る と ひと つ 部 屋 が ある だ け 。 
何 ひ と つ 置 いて な く て , だ だ 天井 の スミ に 
小 き な 穴 が あい て いる だ け な の で す 。 し か 
も 親切 に も 

ウエ ニモ へ ヤ ガ アル ヨウ ダ 
と メッ セー ジ が 出る の で す 。 こ こ で 

MAKE HOLE ( 穴 を あけ る ) 

BREAK WALL ( 壁 を こわ す ) 

USE KEY (カギ を 使う ) 

な ど と メチ ャ メチ ャ や る 次 は みにくい 。 な 
い 頭 を 使わ ね ば な ら な い の で す 。 意 味 も な 

《 家 を 設定 し た り は し な い だ ろ うと この 辺 
は 性 善 説 従っ て よく 考え る と 自然 に ( 紙 
に は こう 書く ) 解答 が で る と いう わけ ( 行 
っ た り 来 た り が 必要 か な ? ) 。 

も う ひ と つの ちょ っ と し た 負 関 は , 手前 


の 家 の 中 に は られ た だ 

[SMALL| 

と いう は り 紙 。 で も これ は わか れ ば 何と も 
な い の で あま り た いし だ こと は な いと し ま 


2 枚 目 は を りゃ あな た すご いで す よ 。 す 
ぐに 洞 《 つ が あり ます が , 中 で , こじ き の 
よう に 拾え る も の は 拾っ た な は いい が , 外 に 
出る 方 法 が わか ら な い 。 苦心 き ん だ ん し て 
や っ と 

OUT CAVE 
で 出 ら れ だ た の で す が , 文法 的 に は OUT が 
動詞 で な いと ころ が 何と も いえ な いと ころ 
で すね 。 

すぐ に ジャ ング ル が ある の で , これ は い 
か ん 送 の 方 向 へ と いっ て みる と が け の 上 に 
家 が 見 えま す が , 何 を 入力 し て も お 手 上 げ 。 
し か た な く ジ ャ ング ル へ 自分 か ら 迷 い 込 む 
こと に し ます 。 も ちろ ん 自分 が どの よう に 
動い た か を 記録 する の は 絶対 必要 。 

この ジャ ング ル の 中 に は 数 多く の 苦い 思 
い 出 が あり ます が , みな る きま に も 味わっ て 
い だ だ くだ た め に あま り 詳 し く は 書き ませ ん 。 
教訓 た と し て は , 

森 の 真ん中 を あな どる な 。 

所 持 品 を 使っ て みろ 。 

と いう こと で す 。 所 持 品 は 
INVENTORY 
と 入力 する だ け で 全部 表示 きれ ます 。 

この 鳥 か ら きら に あな た に は 流浪 の 旅 が 
待っ て いま す が , そこ か ら が また 地獄 で す 。 
特に ウサ ギ さ ん と 仲良 くし て いな か っ た だ 人 
に と っ て は は ほとん ど 行 く と ころ に も 行け な 
いか も し れ ま せん 。 

ここ か ら 先 は も う 暗 示 め いた こと し か 書 
きま せん の で 悪し か ら ず 。 ク マ さ ん か ら 切 
符 を も もらう の は この ゲー ム 最 大 の ヤマ か も 
し れ ま せん ね 。 数 打ち ゃ あたる と いっ た と 
ころ で す 。 も うこ こら 5 へ ん で は , 人 の 助力 
も 少し 必要 と し た こと を 和正 状 い た し ます 。 
が 。 し か し , これ は 絶対 に 狐 力 で 正 々 堂々 
と や る でき で す (と 人 に 対し て は 言う )。 


最後 の 難関 は が け の と ころ で す 。 発 想 の 
転換 で メデ タク 突破 し た と き は 思わ ず 小 代 
り も の で し た 。 


全 所 要 時 間 は 恥ず か し い の で 書 き ませ ん 
が , 文句 な く や り ご た え の あ る アド ベン チ 
ャ ー ゲ ー ム で し だ ね 。 

特に この 「 ド リー ムラ ンド 」 の 秀 れ て い ぃ 
る と ころ は , 全体 の 構成 も る る も の な が ら , 
画面 が 美しく (残念 な が ら カ ラー で は な い ), 
し か も 速い と いう こと で す 。 画 面 デ ゲー タ は 
直接 ディ スケ ッ ト に 画面 一 枚 ご と に 記録 し 
て ある も の か ら メ モリ に 読み 込ん で いる た 
め ,、BASIC の LINE 文 な ど で 作 っ て い 
る プロ グラ ム に 比べ 格段 の 速 き で す ( 数 
秒 で す ) 。 

アド ベン チャ ー ゲ ー ム 全体 に 通用 する 教 
訓 を ここ で まとめ ます 。 


① 根 気 が 何より も 必要 

② 地 図 を 書い て いこ う 

⑧③ 行 き 詰 まっ た ら 所 持 品 を 見 よう 
(《④ 手 が か り を 頭 の 中 で た で ろう 
⑤ 固 定 観念 に た ら わ れる な 


最後 に 『 ド リー ムラ ンド 用 特製 辞書 」 を 
まとめ まし た の で 紹介 し ます 。 実際 に 必要 
な も の だ け ピ ッ タ リ 載 せ た も の で は 何と な 
く お も し ろく な いし , 作者 に 対し て も 失礼 
な の で , 変化 を 持た せ て いま す 。 こ の 表 の 
うち 20% は 本 質 的 で な いも の で す (中 に は 
まっ た く 使 う 場 面 の な いも の も あり ます )。 
さら 6 に 肝心 な と ころ で 必要 と な る 重要 な 
単語 ひと つ だ け は 載せ る こと が で きま せん 
の で 御 了 承 く だ きい 。 

次 回 を お 楽し み に 。 貴 方 も アド ベン チャ 
ー ワ ー ル ド の 泥 深 に 引き ずり 込ま れる こと 
を こっ そり 祈っ て いま す 。 


ENTER CONNRD ? 重 


アド ベン チャ ー ワ ー ル ド へ の 招待 


Z5 


AROUND THE BASIC 


入力 ルー チン の 設計 


の 入力 も チェ ッ ク し , 入力 ルー チン に 戻し て し まい ます 。 時 * 分 ・ 
秒 ょ 3 つの INPUT 文 で す が , 時 間 入 力 の 多い プロ グラ 人 
と つの INPUT で 片付け て し まい ます 。 


、 空 丹 遊歩 さん の 新 連載 。700 と か 2000 の 壁 を と り は ず し 。 つ いで 
に , S-BASIC, HuBASIC, N-BASIC の 境界 線 を 越え て , BASIC プ 
ログ ラミ ング の コツ を 教え て くれ ます 。 


今月 の テー マ 

今月 は 、。 ビ ジネス プロ グラ ム 作 成 上 必要 な , 入力 直後 の チェ ッ 
クル ー チ ン を と りあ げ , 時 間 計 算 と 日 数 計算 の 入力 ルー チン を テ 
ー マ に 話 を 進め まし ょ う 。 

1 時間 は 60 分 , 1 分 は 60 秒 と いっ た , 我々 に と っ て は ご く 当 然 
な こと を , パソ コン に 教え ん, また, 83 年 の 2 月 は 28 日 まで だ が , 
84 年 は うる う 年 だ か ら 29 日 まで ある と いう こと も 教え こみ , 日 数 
計算 や 曜日 算出 を し て みよ うと 思い ます 。 

これ ら 時 間 や 日 数 の 数 ぇ 方 を 教え られ た パソ コン が 。 あり えな 
い 日 時 を 入力 する と すでに 再 入力 を 求め て くる まで に 成長 きせ て 
みみ まし ょ う 。 安心 し て 我々 ん が ミス で きる よう に 。 

プロ グラ ム は 共通 部 分 が 多い の で , 画面 編集 機能 と RENUN ( リ 
ナン バ ) を フル に 使っ て 打ち 込む た, スピ ー ド アッ プ が 図れ ます 。 
また , これ ら の プロ グラ ム を サブ ルー チン 化す る テク ニッ ク も と 
りあ げ , RETURN 文 が 3 つも ある サ プ ル ー チ ン や ., 同 一 テー マ を 
N88 と Hu-BASIC と で プロ グラ ム し て 移植 に 役立つ よう , テー マ 
を 広げ て み ま し た 。 
時 間 の 計算 

アラ ゼア 数 字 は 10 進 法 。 パソ コン は 2 進 法 , マシ ン 語 の 入力 は 
16 進 で す が , さて , 時 間 は 何 進 法 で し ょ うか 。 秒 以下 は 10 進 法 で 
す が , 分 と 秒 は 60 進 , 時 間 は 12 進 ( ? ) と 24 進 , 月 の 日 数 は いっ た 
い 何 進 法 と 呼ん だ 6 良い の で し ょ うか 。 昔 の 日 本 で は うる う 月 と 
いっ て , 同じ 月 が 2 度 あ っ た そう で す が , こう な っ て は 日 数 計算 


は クイ ズ に な っ て し まい ます 。 ともかく 〈, 時 間 を 入力 し , 表示 き 
せる こと か ら 始 め ま し ょ う 。 


MZ-10T- 1 と MZ10T- ら 


INPUT 文 PRINT 文 ひと つ ず つ で OK な ん て 言わ な いで 〈 だ き 
い 。 正しく 入力 され て いる 間 は 目立た な い の で す が , うっ か り 職 
り の キー を た だ いて し まっ だ ら , それ を チェ ッ ク す る の も パッ ツッコ 
ン の 大 切な 役目 な の で す 。 

リス ト 10T- 1 と 10T- 2 と の 違い が わか り ま すか 。 10T- 1 は 数 
と し て 入出 力 し , 10T- 2 は 文字 と し て 入出 力 し て いま す 。 JF 文 は 
数 の 大小 だ け で な く 〈, 文字 の 大 小 (正式 に は アス キー ュー ド 順 ) 
も 判断 し ます か ら , 24 時 以上 を チェ ッ ク し , 60 分 以上 と 60 秒 以上 
Z の 6 oniMZ 1983.10. 
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^ ラ "カン ノ サイ サン フ *" ログ "ラム メイ "MZ19T-1* 
"シラ "カン / ニュ 9 リョ ク 


ィ 


ーーーーーーーーーーーーーーーーーーーーーーーーーーー 


COLOR_ oe ラ " カ ン ノ 2 iPRINT_ 
INPUT " シ 


IF WWD24 THEN BEEP60T0 に 

INPUT " フ (MM ) 

IF MW>=Ge THEN BEEP:GOTO 179 

INPUT " ヒ * ョ (SS ) _ SS 
IF SS>=e9 THEN BEEP:GOTO 1929 


PRINT:COLOR 5 
PRINT HHi" ラ " "MM3 フン“ 


>" カンノ サイ サン p ・MZ19T-2" ' 
" ラ " カ ッ ノ ニュ 9 リョ ク 人 こる 人) 


ョ SS ) SS 
IF SS*>=*69" THEN BEEPGOTO.429 


249 “ 
229 PRINT:COLOR 5 
ラ * "3MM ま 3 "フン 


239 PRINT HH$:" "SS$ ま 』" ヒ " ョ ウ " 


_  MZ10T-3 
。 INPUT 廊 の 中 の 「HHMMSS」 は , 時 分 秒 を 2 桁 ず つっ, 計 6 桁 
の 数 で 入力 する こと を 意味 し て いま す 。 訪 字 変 数 も 同じ 「HHMM 


SS $」 を 使い まし た 。2 文字 変数 に 慣れ た 目 に は 妙 に 写り ます が , 
。 Hu-BASIC は 240 字 まで の 長き の 変数 が 使え を ます 。 た と えば JIKA 


NN, FUN, BYOU な ど , ロー マ 字 読み し た 変数 や 英文 その まま の 
変数 (TIME$ は シス テム 変数 で すか ら , 通常 の 変数 と 同じ よう 
に 使え ませ ん ) が 使え ます 。 
HHMMSS $ を HH$.MM$、SS$ に 分 解 し て いる の が 湊 の MI 
D$ で す 。 
HH$ =LEFT$ (HHMMSS$, 2 ) 
2 SS $ = ニ RIGHT$ (HHMMSS $, 2 ) 
で も 良い の で す が , MID$ で 揃え る と リス ト が すっ きり する の で 


3 行 ほ も MID$ を 使い まし た 。 


210 行 の IF 廊 は , 入 力 され た 六 字 列 が 6 文字 か どう か を チェ ッ ク 
し , マイ ナス 入力 も チェ ッ ク し て いま す 。 
IF HHMMSS$ く “0” THEN 一 
で も 同じ 働 ら き で す が , VAL で 数 値 に 直し て 比較 し て み ま し た 。 
220 行 で は 、 前 の リス ト が 3 つの IF 文 で 行なっ て いる チェ ッ ク を 
時 まま つじ ま よめ まし た 。 
230 行 は お まけ みた いな も の で す が , 24 時 以降 は 00 時 と いう 考え 
で , 24 時 15 分 な ども チェ ッ ク し て いま す 。24 時 15 分 36 秒 な ど と 入 


_MZ10T-4 


カカ し た ら , プラ ム で 0 時 一次 更 する の も よい で すね 和 
THEN HH$ =`00 
も 
ざま で 参 だ で 5 お 5 まん か 宙 う 
は な また , な ぜ ご ん な チェ ッ ク を する の 
か 疑問 に 思わ れる か も し れ ま せん 。 こ れ は ,。 あと に 出 て くる 日 付 
け 入 力 ル シー チン の 前 し ょ う 戦 で , DOS (ディ スク ・ オ ペレ ー テ イィ イ 
ング ・ シ ステ ム ) で は 日 付け に よっ て デー タ を 大 尋 旋 し , 日 数 計 
算 に よっ て FILE (ファ イル ) を 検索 し た り で , か な り 重 要 な 意味 
を 持っ て きま す 。 ま た , ゲー ム で ミス 入力 し た らち 再度 RUN と いう 
の で は 。 今 まで の デー タ が 無駄 に な っ て し まい ます から 可能 な に 
限り チェ ッ ク す る 必要 が ある わけ で す 。 


199 避 ノーーーーーーーーーーーーー ニ ニー マー サー どの 2 に 20 の 放 者 


119 “シラ " カ ン ノ サイ サン フロ グ * ラム ぁ メ イ "WMZ16T-3* 


129 " ジ " カンノ ニュ 9 リョ ク 6 
139 “ ーーーーーーーーーーーーーーーーーーーーー ニ ニー ニニ エー コー ニー ニニ ぷ ニ エコー ゴロ エ ーッ ゴヤ 
149 COLOR 7?:PRINT "シラ "カン ノ ニュ 9 リョ ク " :PRINT 

159 INPUT“ "カン IN (HHMMSS ) 村人 SS$ 

169 

179 HH ま =MID ま (HHMMSS ま , 1 ,2) 


189 MM ま =MID$ も (HHMMSS$,3, 2 ) 
199 SS ま =MID ま (HHMMSS$,5,2) 


219 IF LEN(HHMIMSS ま ) く >6 OR VAL(HHMMSS$) く 9 
THEN BEEP:GOTO 159 


229 IF HH*>"24" OR MM* ま >="69" OR SS$>=*e9" ュー コ 
THEN Ye 159 
239 IF HH*$="24* 


HEN IF 拉 線 く > *・99" OR oo 
THEN BEEP60T0 159 NAS 


259 PRINT:COLOR 5 
269 PRINT HH$:" シ " "MM も 5! フン 


は 9 
279 COLOR 7 に RG 


- 小 学生 に な っ た つも り で , 時 間 の 加算 を し て あみ ま し ょ う 。 チ ェ 
ッ ク ル ー チ ン は 6 文字 入力 か どう か だ け チ ェ ッ ク し て いま す 。LE 
FT$, RIGHT$ も 使い まし た が , 右側 に 空白 を 加え て HHMMSS 
- 入 カル ー チ ン の 設計 ZZ 


$ を 揃え た の で , 前 の リス ト ほ ど で は あり ませ ん が , 少し は すっ 
きり し まし た 。 

420, 450 行 で 繰り 上 げ 計 算 を し て いま す 。 入 力 時 に 分 秒 の チェ 
ッ ク を し て いま せん の で , GOTO420 と GOTO450 が 必要 に な っ て 
きま す 。GOTO を カッ ト す る と , 999999 十 999999 の 入力 に 対し て 
は 199 時 間 139 分 138 秒 に な っ て し まい ます 。 マ イナ ス 入 力も チェ ッ 
ク し て いま せん か ら , マイ ナス 時 間 を 入力 する と 答え が 合わ な く 
な っ て し まい ます 。 

入力 チェ ッ ク を し な い の な ら 処 理 ル ー チ ン に 一 工夫 必要 な わけ 
で , 99 入 力 な ん て 間違っ て いる と いっ て も 入力 され た 以上 , 計算 
し て や ら な けれ ば な り ま せん 。 

119 ">" カン / ケイ サン 
120 ^ シ "カッ ノ タラ サ " ン 
149 COLOR ?:PRINT" ラ "カン ノ タラサ ドン "3PRINT 


159 INPUT" ラ "カン NO.1 (HHMMSS) " :HHMMSS$ 
169 し =LEN(HHMMSS$ ) 
3 M IF L く >6 THEN BEEP:iGOTO 159 


199 HH1=VAL(LEFT ま も (HHMMSS$, 2 ) ) 

299 MM1=VAL(MID$ (HHMMSS$,3,2) ) 

8 。 SS1=VAL(RIGHT ま (HHMMSS$。2 ) ) 

239 PRINT:COLOR 5 

249 PRINT HH1i" ラ " カ ン iMM15 フン 5SS15" ヒ Y ョ 9" 


279 PRINT:COLOR 7 


289 INPUT'" ラ "カン NO.2 (HHMMSS) "':HHMMSS$ 
299 L=LEN(HHMMSS$ ) 

は 2 IF L く >6 THEN BEEP:GOTO 289 

329 HH2=VAL(LEFT ま (HHMMSS$, 2 ) ) 

339 MM2=VAL(MID も (HHMMSS$,3,2) ) 

9 。 SS2=VAL(RIGHT$(HHMMSS ま , 2 ) ) 


369 PRINT:COLOR 5 


379 PRINT HH23” ラ * カ ン "5MM23) フン "5SS23" ヒ * ョ 2" 


< 


429 IF SS3>=69 THEN SS3=SS3-69 MM1=MM1+1:GOTO 429 


449 MM3=MM1+MM2 
459 IF MM3>=69 THEN MM3=MM3-69 :HH1=HH1+1 :GOTO 459 


479 HH3=HH1+HH2 


499 PRINT 
599 PRINT" コ タ エ " 
519 PRINT HH3j" シラ" カン "jiMM3j" フン "SS3j』" ヒ " ョ ウ “" 


Z@ onhiMzZ 1983.10. 


MZ10T-5 
信 度 は 少し ダレ ー ド アッ プ し まし た 。 6 文字 以上 で も 以下 で も 
入力 で きる よう に し , 分 秒 は 60 以 下 の 入力 だ け 受 け 付 ける よう に 
し まし た 。 入 力 1 は, 一度 文 字 変 数 に 代入 し , 入力 2 は 代入 せ ず 
に VAL で 数 値 に 変え て いま す 。 

計算 は 全部 秒 単位 に 変換 し た あと 加算 し , 時 分 秒 に 直し て いき 
ます が マイ ナス 計算 は で きま せん 。 


149 PRINT" ラ "カンノ タラ サン " :PRINT 
159 INPUT" ラ "カン NO0.1 (HHMMSS)  "}jHHMMSS$ 


169 

179 し =LEN(HHMMSS$ ) 

189 IF L く 5 THEN 229 

199 HH1 ま =LEFT も (HHMMSS$,L-4 ) 
っ HH1 =VAL(HH1$) 

19 


229 MMSS ま $ =RIGHT も (HHMMSS$, 4 ) 
239 L=LEN( MMSS$ ) 

249 IF L く <3 THEN 289 

259 MM1$ =LEFT ま $ (MMSS ま も , し -2 ) 


269 MM1 =VAL(MM1$) 

279 “ Ss 
289 SS1 ま =RIGHT$(HHMMSS ま , 2 ) 
229 SS1 =VAL(SS1$) 


399 IF MM1>=69 OR SS1>=69 THEN BEEP:GOTO 159 


329 PRINT > 
339 PRINT HH1i" ジカン "iMM15 フッ 5SS15) ヒョウ " 


369 PRINT 
379 INPUT" ラ "カン NO.2 


3929 し =LEN( HHMMSS ま ) 
499 IF L<S THEN 439 
419 HH2 =VAL(LEFT$ (HHMMSS ま も 。L-4 ) ) 


439 MMSS ま =RIGHT* ま (HHMMSS$, 4 ) 
449 LFLEN(MMSS$) 
459 IF L く 3 THEN 489 


469 
479 “ 
489 


429 


529 


MM2 =VAL(LEFT ま (MMSS$。 し ー2 ) ) 


SS2 =VAL(RIGHT$(HHMMSS ま , 2 ) ) 
IF MM2>=69 OR SS2>=69 THEN BEEP:GOTO 379 


PRINT 


PRINT HH2j" シ * カ ン "iMM25" フン SS25" ヒ Ya9" 


"カイ サン 

GSE 1 #=HH1 *X3699+MM1x69+SS1 
GSE2##=HH2x3699+MM2x69+SS2 
SE3 層 =OSE 1#+GSE2 柏 


HH3 =INT(GSE3/3699 ) 
MM3 =INT((GSE3#-HH3x3699 )/69 ) 
SS3 =GSE3W-INT(GSE3W/69 ) x69 


PRINT 
PRINT" コ タ エ " 
PRINT HH3j" 


シ " カ ン | し 


"jMM3j" フン 


3SS35 " 


マイ ナス 計算 も で きる よう チェ ッ ク ル ー チ ン を 作る と , また 新 
た に 問題 が 出 て きま し た 。 

ー1234 

と 入力 し て く て れれ ば よい の で す が , 

ー1 一 1 

と マイ ナス 1 分 マイ ナス 1 秒 な ど と 入力 され だ たり 
・325 Si 
と 小数 点 を 付け た 入力 も チェ ッ ク し な けれ ば な ら な いこ と に 気付 
き 、 190, 200 行 を 加え まし た 。 こ れ ら チェ ッ ク ル ー チ ン の 必要 性 
が どこ まで か は , 次 に 続く プロ グラ ム に も より ます が , 少な で と 
も 自分 以外 の 人 が 使う プロ グラ ム に は , 多少 と も ちこ の ルー チン が 
必要 に な り ま す 。 

また , ミス 入力 に どこ まで て 対応 で きる か が ソフ ト の 質 を 表わし , 
同時 に プロ グラ マー の レベ ル を 表わす わけ で すか ら , ミス 入力 す 
る ほう が 悪い な ど と 威張っ て いる わけ に も いか な い の で す 。 
計算 ルー チン は INT を FIX に 変え て いま す 。 答え が マイ ナス の 


場合 , INT で は 切り 上 げ て し まい ます か ら , マイ ナス に な る 可能 


性 の ある デー タ の 小数 点 以 下 を 切り 捨て る と き co 4 
7 きい っ 


199 “ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 
119 " ラ " カ ン / サイ サン 72" ログ "ラム メイ *MZ19T-6" 
120 “シラ "カン / タラ サ " ン ト ヒキ サ \ ン 


139 “ーーー ニーーーーーーーーーーーーー ニ ーー ニニ ニー ニニ ニー ニー ニー ニー ニー ニニ ーー ニー ニー ニー ニー ニー ニ ニ ーー 


149 COLOR ?:PRINT ">* カ ン ノ タラ サ 9" ン " *PRINT 
156 INPUT" ミ "カン NO.1 (HHMMSS) "jHHMMSS$ 


179 L=LEN(HHMMSS$ ) 
189 ITF LEFT ま (HHMMSS ま , 1 )="ー" 

THEN HHMMSS$=RIGHT$(HHMMSS ま 。L-1 ) 

: SG1=ー1 : し =L-1 h 寅 SG1 =1 1 
199 IF INSTR(HHMMSS$,"-" ) THEN BEEP:GOTO 159 
299 IF INSTR(HHMMSS$ , いり THEN BEEP:GOTO 159 
219 IF L<S THEN 259 


229 HH1 ま =LEFT ま (HHMMSS ま 。Lー4 ) 
239 HH1 =VAL(HH1$ ま )xSG1 
249 “ 


259 MMSS ま =RIGHT$(HHMMSS$, 4 ) 
269 L=LEN( MMSS$ ) 

279 IF L<3 THEN 319 

289 MM1$ も =LEFT ま (MMSS ま ,L-2 ) 
229 MM1=VAL(MM1$)xSG1 


319 SS1 ま =RIGHT ま (HHMMSS$, 2 ) 
329 SS1=VAL(SS1$ も )*SG1 
339 IF MM1>=69 OR SS1>=69 THEN BEEP:GOTO 159 


359 PRINT:COLOR 5 


369 PRINT HH1j" "カン "jMM13" フン "5SS13" ヒ "a9* 

379 

380 "ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 
329 PRINT:COLOR 7 

499 INPUT * ラカン NO0.2 (HHMMSS) " 』HHMMSS$ 


429 し L=LEN(HHMMSS$ ) 
439 IF LEFT$(HHMMSS*$, 1 )="-" 
THEN HHWIMSS き =R1GHT き CHHMWSS き 。Lー) 


1 SG2=ー1 : し =L-1 ELSE SG2= 
449 IF INSTR(HHMMSS ま ,"-" ) THEN BEEP360TO 499 
459 IF TNSTR(HHMMSS ま 。" 。" ) THEN BEEP:GOTO 499 
469 IF L<5 THEN 499 
479 HH2=VAL(LEFT$ (HHMMSS$ L-4) )xS62 


499 MMSS ま =RIGHT$(HHMMSS$,4 ) 
599 L=LEN( MMSS$ ) 
519 IF L<3 THEN 549 


入力 ルー チン の 設計 の 


29 MM2=VAL(LEFT ま (MMSS$。L-2 ) ) xSG2 


549 SS2=VAL(RIGHT* ま (HHMMSS$, 2 ) )xSG2 
559 IF MM2>=69 OR SS2>=69 THEN BEEP:GOTO 499 


56@ 
579 PRINT:COLOR 5 
589 PRINT HH2:" シラ "カン "35MM2" フン "SS23 "ヒョウ" 


610 "7 イサ ン 
620 GSE1W=(HH1x3699+MM1x69+SS1 ) 
630 GSE2=(HH2x3690+MM2x60+SS2) 
640 GSE3W=GSE1+GSE2 

HH3 =FIX(GSE3W/3699 ) 
689 MM3 =FIX((GSE3W-HH3x3699 )/69 ) 


799 SS3 =GSE3#-F1IX(GSE3t/69 ) 69 


ィ 729 PRINT 

739 PRINT" コ タッ エ " 

ィ 49 PRINT HH3』" ラ " カ ン "jiMM3j" フン "SS3』" ヒ " ョ ウ " 
ィ 759 COLOR ィ iEND 


10T シ リー ズ を 終わ っ て 


時 間 の 加減 算 チ ェ ッ ク を も っ と 短 か い ルー チン で で き な い も の 
で し ょ うか 。 こ れ ら チェ ッ ク ル ー チ ン を マル チ ス テー トメ ント に 
し た り , IF 女 を 重ね る こと で , ス テッ プ 数 を 減ら すこ と は か ん だ 
ん で す が , も っ と 別 な アル ゴリ ズム を 考え て コンパ クト に する こ 
と も 可能 で は な いか と 思い ます 。 そ の ひと つ は , チェ ッ ク ル ー チ 
ン を サ プ ル ー チ ン に し , 入力 1, 2 を 共通 ルー チン で チェ ッ ク す 
る こと , 2 つ 目 は , 皆さん で 考え て くだ さい 。 

ラリ ー の ナビ ゲー タ は , 車 に パソ コン を 積み , 内 と 路 
面 状態 か ら ス キッ プ 率 を 算出 し , 平均 時 速 と 時 間 を リア ル タ イ ム 
に 算出 し , ドラ イ バ ー に 次 々 と 走行 スピ ー ド の 指示 を 与 を て いま 
す 。 彼 ら の チェ ッ ク プ ログ ラム を 見 せ て も ら っ た の で す が , か な 
り 大 き な チ ェ ッ クル ー チ ル で し た 。 き っ と 走る 車 の 中 で の 入力 は 
ミス が 多く は る か ら な の で し ょ う 。 


年 月 日 を 入力 し , 表示 し て み ま し ょ う 。 ' 

日 付け を 入力 し 、 表 示さ せる だ け な ら 、 月 と 日 を チェ ッ ク す る 
これ ら の ルー チン で 充分 で す 。 入力 され た 字 列 を 3 つ に 分 け 。 
年 月 日 に を それぞれ 代入 し て いま す 。 通常 の "ジネス プロ グラ ム で 
は ば *6 桁 入力 か 月 日 だ け の 4 桁 入 力 を 使い 、 1 月 1 日 は 0101 入力 
し ます 。 「 ' 

マイ ナス 年 と 入力 する こと も な い の で , 年 数 チェ ッ ク を 省 いた 

ら 一 1 年 と 出力 され , 次 に 年 度 チ ェ ッ ク も 加え る こと に な り ま し 
た 。 も し 請 書 の 年 度 が 邊 っ て いた り し た ら 。 計 も 到 払 を し 
て くれ な いで し ょ う ね 。 Se 


199 - 
119 “レヒ め * ケ チェ ッ ク > ュ ミレ ー ョ ョ ン Se ん 
129 7" ロ グ ク " ラ ム メ イ  “MZ19H-1 - 


@ の oniMz 1983.10. 


ニタ 


149 INPUT" ヒ 9 ゥ "か 。 IN (YYMMDD) "iD* 

159 YY=VAL(MID$(D$ ま , 1 ,2 ) ) 

169 MM=VAL(MID$(D ま ,3,2 ) ) 

179 ee ンタ) 

189 COLOR 

199 PRINTs 人 に ya サレ タ ヒ ツ * ケ 
ご 交 53BDS ジ ニテ 


"3YYj "ネン "5MMi "の" 


ィ 
229 IF NOT LEN(D$*)=6 
239 IF MM<1 OR MM >12 
249 IF 了 OR DD>31 


THEN BEEP:GOTO 149 
THEN BEEP:GOTO 149 
THEN BEEP:GOTO 149 


サレ タ ヒ ツ " ケ 


YY "ネン "SMM3 " カ " 


年 度 を 83 年 以降 とし, 月末 チ ェ ッ ク を し て み ま し た 。 310 行 の 

DD>M(MM) 
が この プロ グラ ム の ポイ ント で す 。 250 行 で 入力 され た デー タ を 
一 応 表示 し ます が , 280 一 310 行 が 強力 で , 変 な 日 付け を 入力 する 
と な か な か 330 行 まで 進め ませ ん 。 た だ し , 83 年 2 月 29 昌 は OK に 
な り ま す 。 


199 “ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 
119 “レヒ ツ " ケ チェ ッ ク シュ ミレ ーション 
フ ”" ロク "ラム メイ  "MZ19H-2* 


- 149 DIM M(12) 
159 FOR 1=1 TO 12 
169 READ M(1) 
179 NEXT 
、 199 DATA 31.2231.39・31,39・31,3139。31。39。31 


299 INPUT" ヒ 9*" ケ 。 IN (YYMMDD) "5jD* 


219 YY=VAL(MID*(D$*,1 2 ) ) 

229 MM=VAL(MID$(D ま ,3,2)) - 6 SS 
239 Dean 5,2)) Ru が 7 
249 COLOR 4 記 


259 PRINT: PRINT "ニュ 9 リョ ク サレ タ ビッ AE2HuHz 
"DD "ニチ" し ちい 

26 に ーー 19 ニニ ーー ニー ニー エー ニニ テー ー ニ ーー ニーーーーー ェ ニー 

286 1F NO NOT LENcD*)=6 THEN BEEP GoTO 299 

2929 IF YY<83 THEN BEEP:GOTO 299 

399 IF MM<1 OR MM->12 THEN:BEEPsGOTO 299. 


319 IF DD<1 OR DD>M(MM) THEN BEEPsGOT0.299 

329 COLOR 5 

339 PRINT: PRINT "チェック 
ツ " 3DD: "ニチ “* 

349 COLOR 7 

359 PRINT:GOTO 299 


369 ニニ ニニ ニニ ニー 


ッ レ タ ヒト ケ LA ネン "iMMIT か 


万 年 カ レン ダー を 入れ る ほど で も な い の て 290 行 を 追加 し , う る 
る う 年 の チェ ッ ク を し て み ま し た 。 生 be 
同じ ルー チン を 使っ て 曜日 も 算出 し て み ま し ょ う 。 


4 の ーー ニー ニー ニーーー ジ に emm ペデ ao 
110 ^ ヒ 9* ケ チェ ッ ク ラ ュ ミレ ーション 
120 ′ 7" ロ 2* ラ AX メイ "NMZ19H-3" 0 
139 ^ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー ? 
149 DIM M(12) Se ー 
159 FOR 1=1 TO 12 YR 
169 READ M(1) >kY+ PE 

NEXT 


189 DATA 31,28,31 ,39,31 。 3931r31.3973t・39.3t 6 


266 INPUT* ヒ s* ケ IN (YYMMDD) "iD* 
216 YY=VAL(MID*(D$,1,2) ) 8 


226 MM=VAL(MID*(D*。3。2) ) 0 
239 DD=VAL(MIDCDW。5x2) 
249 COLOR 4 


259 PRINT: PRINT "ニュ 9 リョ ク サレ タ ヒ %* ケ SH が 
入力 ルー チン の 設計 cp 


の "3 3DD: 人 
279 COLOR 7 
289 IF NOT _.LEN(D$)=6 
299 IF YY MOD 4=9. 

_ ELSE M(2)=28 
399 IF YY<83 THEN BEEP:GOTO 299 
319 IF MM<1 OR MM >12 THEN BEEP:GOTO 299 
329 IF DD<1 OR DD>M(MM) THEN BEEP:GOTO 299 
339 COLOR 5 
349 PRINT: PRINT "チェ ゥ ク 


THEN BEEP:GOTO 299 
THEN M(2)=29 


サレ タ ヒ ツ * ケ ーー "3YY5 "ネン "5MMi "か" 


369 PRINT:GOTO 299 
370 “ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 


MZ10H- 4 と MZ10H-5 


簡易 型 万 年 が レン ダー の ルー チン が 440 一 520 行 で す 。83 年 か ら 
99 年 12 月 31 日 まで 使え ます 。10H- 5 は 少し コン パク ト に な っ て い 
ます が , 同じ アル ゴリ ズム を 使っ て いま す 。 

DIM (ディ メン ジョ ン ) は M 配 列 ビ だ け で WE $ は 宣言 し て いま 
せん が , 10 以 下 で す の で この まま 使え ます 。 気 に な る 方 は , 

DIM M(12), WE$(7 ) 

CE が 人 き : い 。 

デー タ 文 は READ 文 の すぐ 後ろ へ 付け て お きま し ょ う 。 デ ー タ 
文 だ け を プロ グラ ム の 後ろ の に まとめ て し ま ょ うと, データ ず れ が 起 
きた と き に デバ ッ グ が た い へ ん で す 。 

IF 文 が 何 行 も 続く て ときには, 空白 を 入れ て THEN ELSE な ど 
を 揃え て し まい ます 。 リ スト が 見 や すく な り , その 分 だ け デ バッ 
グ が 楽 で す 。 完全 に テス ト 済 み に な っ た ら , AND, CR を 使っ て 全 
部 まとめ て も 構い ませ ん が , 第 一 段階 は デバ ッ グ し や すさ を 基本 
に し て くだ きる い 。 


@2 ohiMz 1983.10 


1109 “ ヒ ツ " ケ チェ ッ ク シュ ミレ ーション 
129 3 フ * ロク "ラム メイ  "MZ19H-4“* 


189 DATA 31,28,31,39,31 ,39,31 ,31 ,39 ,31 ,39 ,31 


299 FOR 1=1 TO 7 

219 READ ME$(1) 

229 NEXT 

239 DATA こ チ ヨウ , り "ヨウ 。 カ ヨウ, スイ ヨウ , モ ク ヨウ 。 キ ン ヨウ , ト " 


269 INPUT" ヒ ゥ *" ケ 。 IN (YYMMDD) "5jD* 
279 YY=VAL(MID*(D ま 1 ,2) ) 
289 MM=VAL(MID ま (D ま ,3,2 ) ) 
229 DD=VAL(MID*(D*,5,2) ) 


319 COLOR 4 

329 PRINT: PRINT "ニュ 9 リョ ク サレ タ ヒ ツ " ケ 
9 2D02 = ニチ" 

339 COLOR ? 

349 IF NOT LEN(D ま )=6 
359 IF YY MOD 4=9 

E M(2)=28 


YY ネン" iM" が か * 


THEN BEEP:GOTO 269 
THEN M(2)=29 ELS 


369 IF YY<83 THEN BEEP:GOTO 269 
379 IF MM<1 OR MM >12 THEN BEEP:GOTO 269 
389 IF DD<1 OR DD>M(MM) THEN BEEP:GOTO 269 


329 COLOR 5 
499 PRINT: PRINT "チェ ゥ ク サル レタ ヒ ツ " ケ "YY "ネン " ョ MMi "か" 


^ 81 ネン ヲ ケイ サン / ノ キソ トス ル 。 
469 U=INT(Y/4 ) 。 セッ ネット" マテ" / ウル 9 ト "シノ / カス * 
479 TD=Yx365+U+3 。 ヨ 9 ヒ * ノ ス "レル ヲ シュ 9 セイ スル 。 
489 FOR 1=1 TO MM-1 ブフ テラ スメル 。 
429 TD=TD+M( 1 ) 
599 NEXT 
519 TD=TD+DD 。 セ フ フト ラス ズ 記 > 
529 YO=TD MOD 7+1 ” ヨウ ヒ * ラ サン シ ツ スル 。 
539 PRINT UE$ ま (YO) 
349 GOTO 269 


119 “ ヒ ツ " ケ チェ ウ ク シュ ミレ ーション 

120 ′ フ " ロ ク " ラ ム メ イ -"MZ19H-5" 1 
139 RE ーー 
149 DIM M(12) 

159 FOR 1=1 TO 12:READ M(I) :NEXT 

169 DATA 31,28,31 ,39,31 ,39 ,31 ,31 , 39 , 31 , 3 , 31 
179 FOR 1=1 TO ? :READ ME*(1):NEXT 

189 DATA ニチ ヨウ , ケ "ツウ ヨウ, カ ヨウ, スイ ヨウ , モ ク ヨウ 。 キ ン ヨウ 。 ト * 


290 "ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー ーーーーーーーーー ーーー 
210 INPUT* ヒ ゥ * ケ 。 IN (YYMMDD) "jD* 

226 YY=VAL(MID*(D$,1,2) ) 
236 MM=VAL(MID*(D$,3,2) ) 
246 DD=VAL(MID*$(D$,5,2) ) 
256 IF NOT LENGD$)=6 
269 IF YY MOD 4=9 


THEN BEEP:GOTO 219 
THEN M(2)=29 ELS 


THEN BEEP:GOTO 219 
289 IF MM<1 OR MM >12 THEN BEEP:GOTO 219 
299 IF _DD<1 OR DD>M(MM) THEN BEEP:GOTO 219 
399 COLOR 5' ・ 

319 3 PRINT" ヒ ツ * ケ "3YYj "ネン "5MMi "が リリ "DD ニチ" 


349 TD=DD+3: っ 


359 FOR 1=1 TO MM-1:TD=TD+M( 1 ) :NEXT 
369 YO=(TD+Yx365+INT(Y/4) ) MOD 7+1 
379 PRINT oy も 9 

389 COLOR 7 

329 PRINT:GOTO 219 


MZ10H-B 


2 つの 方 法 で . それ ぞ れ 1 月 1 日 か ら の 日数 算出 と 曜日 計算 を 
し て いま す 。 
ラン ダム ファ イル で 必要 な デー タ を 入出 力 する 際 に , これ ら の 
昌 数 計算 ルー チン を 使い は す 。 た と えば , 10 月 1 日 の デー タ を 274 
番目 の レコ ュー ド に 入れ て お きま す 。 次 に , デー タ を 取り 出し で 
INPUT “OUT DATA(YYMMDD)” : D$ 
531001 
これ で , 53 年 度 フ ァイル の 274 番 目 を 取り 出し , 
理 す る こと が で きま す 。 


リア ル タ イ ム に 処 


199 "ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 一 

119 "レヒ め " リ チェ 9 ク シュ ミレ ーション 

129 “ フロ グ ク " ラ ム メ イ  "MZ19H-6" 

音 2a ニ ニ ミニ ミニ ニニ ーー ニニ ーー ニー ニー ニニ ーー ニニ ニー ニニ ニー ニーー ニ ーー ニーー ニ ニニ ーー ニー ニー ニ 

149 DIM M(12),MD(12) 

159 FOR 1!=1 TO 12:READ M(I) :NEXT 

169 DATA 31 ,28,31 ,39 , 31 , 39 , 31 , 31 , 39 , 31 , 39 ,31 

179 FOR 1!=1 TO 12:READ MD(1) :NEXT 

ri DATA 99,31 ,59,99 ,120 , 151 ,181 ,212,243。273,39 
ます 

199 FOR 1=1 TO 7 :READ ME$( 1 ):NEXT 

299 DATA ニチ ヨウ , か "ヨウ 。 カ ヨウ, スイ ヨウ 。 モ ク ヨウ 。 キ ン ヨウ ,。 ト " 


249 YY=VAL(MID*(D ま 。1 。2 ) ) 
259 MM=VAL(MID* ま (D$,3,2) ) 
269 DD=VAL(MID ま (D$,5,2 ) ) 


279 IF NOT LEN(D*)=6 THEN BEEP:GOTO- 239 


289 IF YY MOD 4=9 THEN M(2)=29 。 ELS 
E M(2)=28 

229 IF YY<83 THEN 0 執 EEE 239 

399 IF MM<1 OR MM >12 :GOTO 239 


319 IF DD<1 OR DD>M(MM) 恒 BEEP :GOTO TO 239 
329 COLOR 5 
339 PRINT: PRINT" ヒ ツ " ケ "YYi" ネ ン Eu か 9" DD3 "ニチ "“ 


349 
350 “ーーーーーーーーーーーーーーーーーーーーーーーー- ーーーーーーーーーーーーーーー 
369 TD=DD+3:Y=YY-81 

379 FOR 1=1 TO MM-1:TD=TD+MK 1 ) :NEXT 

389 Y0=(TD+YX365+INT(Y/4 ) ) MOD 7+1 


329 PRINT UE*$(YO):" ビ "" 


419 N1=DD:FOR !=1 TO MM-1:N1=N1+MCT):NEXT 
429 PRINT"1 カ " ツ 1 ニチ カラ / =929 (サイ サン 419 ー "jsN1 


449 N2=MDMM)+DD:IF YY MOD 4=9 AND MM>2. TuEN N2=N 
459 PRINT'1 が 9 1 チカ 2/ =929 (279> 2) 「jN2 


479 COLOR 7 
489 PRINT:GOTO 239 


4②0 ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー コ 


MZ10H- フー 
年 度 入力 を 省く と , 曜日 計算 は 別 の 方 法 を と ら な けれ ば な り ま 
せん 。 し か し , ファ イル 検索 に 使う だ け な ら , 1 年 を 366 日 と し て 
プロ グラ ム を コン パク ト に する こと が で きま す 。 も っ と 短 か く す 
る な ら 全 部 31 日 に し て し まい ます 。 多少 空 白 の 多い ファ イル に な 
り ま す が , プロ グラ ム の 手間 は 省け ます 。 
入力 ルー チン の 設計 3. 


109 “ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 
119 “ ヒ ツ *" ケ チェ ッ ク シュ ミレ ーション 
129 H フ " ロク "ラム メイ  "MZ19H-7“ 


149 DIM M(12) ,MD(12) 
ye 1=1 TO 12:READ M(I):MD( 1 )=MD( 1-1)+M(1I-1 ) : 
169 DATA 31,29,31 ,39 ,31 ,39 , 31 ,31 , 39 , 31 , 39 , 31 


199 INPUT" ヒ ゥ " ケ 。 IN (MMDD) "jiD* 

299 MM=VAL(MID$(D* ま , 1 2 ) ) 

219 DD=VAL(MID$(D$,3,2) ) 

229 IF NOT LEN(D*)=4 THEN BEEP:GOTO 199 
239 IF MM<1 OR MM >12 THEN BEEP:GOTO 199 
249 IF DD く <1 OR DD>M(MM) THEN BEEP:GOTO 199 


259 COLOR 5 
269 PRINT: PRINT " ヒ 9* ケ 3MM3 "が と ツ "5DDi "ニチ " 


299 N1=DDiFOR 1=1 TO MM-1:N1=N1+M( 1 ) :NEXT 
399 PRINT'1 か" り 1 - チ カラ ノ 
319 N2=MD(MM)+DD 

329 。 PRINT"1 カ " ツ 1 ニチ カラ ノ 
339 COLOR 7 

349 PRINT:GOTO 199 


=929 (サイ サン 1) "3N1 
=9 ス 9 (サイ サン 2) “5jN2 


MZ10H-8 と MZ10H-9 


10H- 8 は N88-BASIC で , 10H- 9 は Hu-BASIC で 書い て いま す 。 
160 行 と ラベ ル の 使い 方 以外 は , ま っ た て 同じ ルー チン で す 。 
250 ※IN1 
! 
250 LABELYTN1? 


440 GOSUB ※CH1 
! 
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440 GOSUB “CH1? 


これ ら ラ ベル の 付け 方 が も ちょ っ と 違う だ け で , Hu-BASIC は N 
88 と 共通 な 言語 が ほとん ど で す 。 細 か な 違い に と ら わ れず , N88 
か ら も プロ グラ ム を いた だ いて し まい まし ょ う 。 

ミス 入力 さえ な けれ ば 99% 動 く は ず で す 。 

も し エラ ー に な っ た ら 。 その 行 を チェ ッ ク し , 他 の 命令 に 置き 
換え て いき まし ょ う 。 

た だ し , グラ フィ ッ ク 命 令 が 含ま れる と ちょ っ と 困難 に な り ま す 。 


119 “ ヒ ツ ^" ケ チェ ッ ク シュ ミレ ーション N8S8-BASIC 

129 " フ " ロ ク " ラ ム メ イ  "MZ19H-8* 

139 “ーーーーーーーーーーーーーーーーーーーーーーーーー ニ ーーー ニー ニー ニニ ニー ニー ニニ ーー ニー ニ 
149 


159 “ショ キ カ ルー チン 

169 MIDTH 89,25:CONSOLE 9,25,9,1:COLOR 7:CLS 
179 DIM NM(12) 

189 FOR 1I=1 TO 12:READ M(I) :NEXT 

129 DATA 31,28,31 ,39 ,31 ,G9 31 ,31 , 39 , 31 , 39 , 31 
299 FOR =1 T0 7 sREAD UE$( 1 ) :NEXT 

210 DATA ニチ ヨ 9。 ヶ * り ヨウ 。 カ ヨウ 9。 ヨウ 9, モク ヨコ 9。 キ ン ヨウ , ト * 


259 wIN1 


289 INPUT"NO.1 9* ケ 。 IN (YYMMDD) "3D* 


329 PRINT: PRINT" ヒ 9" サ "35YYj "ネン "5MMi "がり "DDj ニチ" 
339 PRINT ME$(YO)j』" し ヒ *" 
349 PRINT "サイ サン キソ ヒ * カラ ノ / ニ 9 ス ウ NO0.1 "jN4 


399 “NO.2 テ "ー タ ー IN ト ヒョウ ラ " ルー チン 
499 ※IN2 

419 COLOR 4 

429 SM=2 

439 INPUT "NO.2 Eg だ か ITN 
449 GOSUB ※CH1 

459 GOSUB XKE1 :N3=N1 -N2 


479 PRINT: PRINT " ヒ ツ * ヶ MM が かがり "DDi ニチ" 
489 PRINT ME*$(YO)j" し じ *" 

499 PRINT "サイ サン キソ ツ ヒ * カラ ノ ニ 9 ス ウ NO0.2 "3N1 
599 COLOR 7 

349 PRINT "NO .1 カラ NO.2 マテ * ノ ニ 9 ス 9 "jN3 

29 “ 1 5 
539 PRINT:PRINT :GOTO xIN1 

5409 ?ー ニ ーーーーーーーーーーーーーーーーーーーーーーーーーーーー ニ ーー 一 ーーーーーーーーーーー 一 
559 "チェック サフ "ルー チン 

569 *CH1 

579 YY=VAL(MID$(D ま ,1,2) ) 

589 MM=VAL(MID$(D$,3,2 ) ) 

5929 DD=VAL(MID ま (D ま ,5,2 ) ) 


(YYMMDD) "jD ま 


YY ネン 


699 IF NOT LEN(D$)=6 THEN *※RE1 SR) 
619 IF YY MOD 4=9 THEN (2 う = スタ "ELS 
E _M(2)=28 な と 6. 
629 IF YY<83 THEN ※RE1 54 

639 IF MM<1 OR MM >12 。 THEN *RE1 | 
649 IF DD<1 OR DD>M(MM) THEN AS 
659 RETURN RS 
669 ※RE14 


679 BEEP:TIF SM=1 THEN RETURN ※IN1 ELSE RETURN 
※IN2 


699 “ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー ーーーーーーーー 
799 “サイ サン サフ "ルー チン 6 
719 ※KE1 で 

729 TD=DD+3:』Y=YY-81 を 


739 FOR 1!=1 TO MM-1:TD=TD+M( 1 ) :NEXT 
749 N1=TD+YX365+INT て Y/4 ) 


ーーーーーーーーーーーーーーーーーーーーーーーーーーーー 一 


9 199 の 


も す 19 “ ヒ ツ * ケ チェ ッ ク シュ ミレ ーション Hu-BAS1C 
、 126 " 。 フ " ロ グ " ラ ム メ イ  "MZ49H-② 


159 “ショ キネ カ ルー チン 


3 も 66 CONSOLE 9@,25:COLOR 7:CLS 


179 DIM M(12) 
189 FOR 1=1 TO 12:READ M(I) :NEXT 
199 DATA 31,28,31,39,31 ,39 ,31 , 31 39 , 31 , 39 , 31 
209 FOR 1=1 TO 7 :READ UE$(1):NEXT 
219 DATA ニチ ヨコ 9,9* り ヨウ 。 カ ヨウ, スイ ヨウ 。 モ ク ヨウ 。 キ ン ヨウ , ト * 


249 “NO.1 仙人 TN ト ヒョウ シ *" ルー チン 


INPUT "NO・1 9* ケ 。 IN (YYMMDD) "iD ま 


9 PRINT: PRINT " ヒ ツ " ケ "YYj "ネン" 5MMi "カリ ツリ "DD ニチ“ 
PRINT ME*$(YO)j』" を 


289 
299 
399 
319 
329 
-339 
349 PRINT "サイ サン キソ ヒ " カラ ノ ニ 9 ス ウ N0.1 。 "5』N1 
359 
369 
3 
389 
3929 
499 


"NO .2 テ "ー タ ー IN ト ヒョウ ラ * ルー チン 
LABEL " IN2* 
COLOR 4 


SM=2 
439 INPUT "NO.2 ヒッ 9* ケ サ IN 
449 GOSUB "CH1" 
の G0SUB "KE1 " :N3=N1 -N2 


479 PRINT: PRINT " ヒ ツ " ケ "YY "ネン "5MMi "が "9" DD "ニチ " 
489 PRINT ME$ ま (YO)j" し ヒ *" 

499 PRINT "サイ サン キソ ゾ ヒ " カラ / ニ ゅ スウ N0.2 "#N1 

'599 COLOR 7 

ピコ PRINT "NO・1 カラ NO.2 マテ " ノ ニ ゅ スウ "3N3 


、 539 PRINT:PRINT:GOTO "IN1" 


559 "チェック サフ "ルー チン 
569 LABEL "CH1" 
579 YY=VAL(MID$ ま (D ま , 1 ,2 


529 DD=VAL(MID も CD*,5,2 

699 IF NOT LENCD*)=6 THEN "RE1* 

619 IF YY MOD 4=9 THEN M(2)= ELS 
E NM(2)=28 

629 IF YY<83 THEN "RE1" 

639 IF MM<1 OR MM >12 THEN "RE1" 

649 IF DD<1 OR DD>M(MM) THEN "RE1* 

659 RETURN 

669 LABEL"RE1" 

679 BEEP:IF SM=1 THEN RETURN "IN1" ELSE RETURN *1 


(YYMMDD) "jD* 


790 “ケイ サン サフ "ルー チン 

719 LABEL"KE1* 

729 TD=DD+3:Y=YY-81 

739 FOR 1=1 TO MM-1:TD=TD+MK 1 ) :NEXT 
'749 N1=TD+YX365+INT(Y/4 ) 

759 YO=N1 MOD 7?+1 


共通 ー チ ン を 取り 井 し て す プ ルー チン に する 話 は ま rs 


ます が , GOSUBー で 帰り は 全部 RETURN で す 。 。 
入力 チェ ッ ク ル ー チ ン は 単なる RETURN で は 役立た だ ない の で す 。 

650 行 の RETURN は 入力 ミス の な いと き の RETURN で すか ら , G 

0SUB の 次 の 命令 へ 戻っ て も 構い ませ ん 。 も し No. 1 入力 が ミス 


な ら 250 行 へ 、No. 2 入力 が ミス な ら 400 行 へ と 、 処理 結果 に よっ 


て 戻 9 先 が 変 わる と き は 。 IF 一 GOTO な ど で 条 件 分 岐 を し て 、 な 
ん と な くす っ きり し な い プ ログ ラム に な っ て し まい ます 。 メ イン 
プロ グラ ム も GOTO 訪 で 書か な けれ ば な り ま せん か ら 、 行っ た ま 
まな の か , 帰っ て くる の か , 1 回 で は わか ら な い プ ログ ラム に な 

り ま すね 。 そこ て RETURN を マニ ュ ア で 探す 

RETURN 行 番号 9 

RETURN バラ ベル : 5 ディ ャ マ 
ょ 共 い で の 4 で は か 9 まだ 
っ そく 活用 し まし た 。 - 

Ne 1 か Ne. 2 か は SW 変数 を 使い ます 。 こ れ て 有 要 な 戻 め へ 
戻っ て て れ ま し た 。「 プ ラボ ー ノ 」 と いう わけ で : you 
ま : 

ン ョ グラ ム か ら み ベル の 便 も 革 還 だ 69 行 番号 
を 気 に せ ず 、 どこ に で も この まま 打ち 込め る サブ ルー チン に な っ 
て いま す 。 ま た , 案外 か ん た ん だ な 、 と 思っ た 考 に , 次 の テー マ 
を プレ ゼン ト し ます 。 1 日 で は で き な い テー マ だ と 思い ます が …。 


ある 年 月 日 か ら , ある 日 数 後 は 何 年 何 月 何 日 か 。 また 。 ぁ る 
日 数 前 は ? 曜日 は 7?? 


先月 で ,. メモ リ ま わり の ハー ドウ ェ ア が 
完成 し まし た の で , 今月 は ツ フ トウ ェ ア を 
4 る EE に 、 し っ ま に に よう と 

本 当 は 先月 号 で ROM ライ タ と プロ グラ 
ム を 載せ る つも り だ っ た の で す が , 私 の 試 
験 が 近かっ だ た こと も あり , BASIC に 書き 直 
す の が ま に あ わ な か っ た の で す 。 

私 は , ハー ドウ ェ ア の テス ト や , ROM 
ライ タ の コン トロ ー ル プロ グラ ム な どの 用 
途 に は GAME と いう , 約 1.5K バ イト の 超 
小型 の イン タプ リタ を 愛用 し て いま す 。 

イン タプ リタ で BASIC の 約 3 倍 , コン 
パイ ラ を 通す と , さら に 約 10 倍 程度 の 速度 
に な る うえ , 2 バイト を 同時 に PEEK, 
POKE で きた り , メモ リ 操 作 に 強い な どの 
特徴 が あり ます し , 2 K バ イト に 満た な い 
大 きる ですから, フリ ー エ リア も 広く , 何 
より も ロー ド 時 間 が 短い の が あり が た い の 
が 

し か し , この 連載 で , その よう な ロー カ 
ル 言 語 (地方 語 ? ) を 使う わけ に も いき ま 
せん の で , 何と か Hu-BASIC で 書き 直し て 
み ま し た (シャ ー プ 系 で は 16 進 操作 が CAME 
より 貧弱 すぎ て 難し を そう で し た の で )。 

走ら せ て みる と あま り に も 遅い の で す 。 

し か た な く , GAME 版 よ り の 機能 を 削り , 
プロ グラ ム 書 き 込 みた ROM の 読み 出し の 
RES きよ 922 に に じ ま も だ 。 

ROM ラ イタ を コン トロ ー ル する た だ ため に 
は , 8255 の 操作 法 を 知ら な く て は な り ま せ 
ん 。8255 は , 単なる 入出 力 ポ ボー ト と し て 使 
う モ ー ド 0 の ほか に , 他 の コン ピュ ー タ と 
デー タ の 交換 を 行う と き の た め の モ ー ド 1 
や モー ド 2 が あり ます 。 

それ ぞ れ の 詳細 を 知り た い 方 は , チッ プ 
の マニ ュ ア ル (店 で 頼め ば コピ ー し て くれ 
る と 思い ます ) を 読ん で いた だ く こ と に し 
て , ここ で は ROM ラ イタ 用 に 必要 な モー 
ド 0 に つい て 説明 し て お きま し ょ う 。 

@6 OohiMZ 1983.10. 


モー ド 0 では, ポー ト A, ポー ト B, ポ 
ー ト C の 上 位 4 ビッ ト (PC4 一 PC7) お よ 
び ポ ボート C の 下位 4 ビッ ト (PCo 一 PC3) 
に つい て , それ ぞ れ 入力 に する か 出力 に す 
る か の 設定 が で きま す 。 

また , ボート C に つい て は , 特定 の ビッ 
ト の み を 1 に し た り 0 に し た りす る こと が 
可能 で す 。 

あと は , た と えば ポー ト B に デー タ を 出 
力 し た いと き は , 01H 番 地 に その デー タ を 
OUT し , ポー ト A か ら デ ー タ を 読み た け 
れ ば 00H 番 地 を 1N 命令 で 読込 め ば よ いわ 
け で が 

ビッ ト セ ッ ト ・ リ セッ ト も それ ほど や っ 
か いで は な く 《 く , た と えば PC4 を 1 に し た け 
れ ば , 00001001② 09H を CWR, 03H に 
OUT すれ ば よい の で す 。 

少し わか り に くい か も し れ ま せん が , 今 
回 の アロ グラ ム を 参考 に 。 テス タ で ポー ト 
の 電圧 を 読み な が ら , いろ いろ な デー タ を 
書き 込ん で みる うち に 納得 で きる よう に な 
る と 思い ます 。 

各 ポ ー ト の 入出 力 決定 や 、 ポー ト C の ビ 
ッ ト の セッ ト (1 に する こと ), リャ ッ ト (0 


8255 の モー ド 0 に お ける 
コン トロ ー ル 


Dz Do 

右 回 回 際 較 回 選 
りり 

融 訂 回 回 内 還 回避 


人 22SN 出力 ポー ト と し て 設定 
Mesa 入力 ポー ト と し て 設定 


D7 De 
lxlxlxlslwlslw 


| 仙 COOCCCCLCD 1。 0 どちら で も よい 
SiSzSs…… ポ ー ト C の ビッ ト 選 択 

(ex. PC4…Si 王 1。 Sz 三 0, Ss 王 0) 
Noevco22o? SiSzSs で 選ん だ ビ ピット を 1 に す 


る か 0 に する か を 決め る 。 


に する こと ) は 図 1 の よう な デー タ を 8255 
の CWR (コン トロ ー ル ・ ワ ー ド ・ レ ジス 
タ ) に 書 込 む こと で 行わ れ ま す 。 

各 ポ ー ト と アド レス の 関係 は 図 2 の よう 
に な っ て いま す の で , た と えば , ポー ト A 
の み を 入力 , 他 を すべ て 出力 に し たい と き 
は , 1001000 ゅ 90H を 03H 番 地 に OU〒 
すれ ば 良い わけ で す 。 

それ で は まず , コン トロ ー ル プロ グラ ム 
の 機械 語 ル シー チン か ら み て いき まし ょ う 。 

機械 語 ル ー チ ン は 8 つ , ご く 基 本 的 な パ 
ー ツ の よう な も の の み で す の で , それ は ほど 
難し く は な いで し ょ う 。 
⑩C000 一 (Set mode to read) 

ROM か ら デ ー タ を 読取 る よう に ポー 
の 向き を 切換 え , PC7 を 上 に し で, 25V を 
OFF に し ます 。 この と き 。 PCg を に し て 
し まう と , プロ グラ ム パ ルス が 与え られ る 
可能 性 が あり ます の で , PCe は 1 に し て おぉ 
きま す 。 他 の ビッ ト は 1 で も 0 で も 良い の 
で す が , 考え や すく する だめ に , 関係 の な 
い ビ ッ ト は すべ で て 0 と し て あり ます 。 
@C010- (Set mode to write) 

書込み 用 に ポー ト の 向き を 切換 え , 25V 


2 イタ Es 


アド レス (1/0 空 間 ) 


を HH00 (ROM の デー タバ ス ) 
を H0I (ROM の アド レス バ が バス) 
&H02 (下図 参照 ) 

を 日 03 


HOM の アド レス パ バス. 
プロ グラ ム / チ ッ プ セレ クト パル ス 


25V コ > ント ロー ル 
1: ON 
0:OFF 


を ON に し ます 。 

ポート A か ら ポ ー ト C の すべ て が 出力 ポ 
m* ホ に な り ま す 。 

@C020- (A dress set) 

ROM の 書き 込み / 読 み 出 し アド レス を 
ボ ポート B, お よび ポー ト C に セッ ト し ます 。 

C021H に B ポ ー ト に 与え る 値 , C022H 
に C ポ ー ト に 与え る 値 を 書き 込ん で か ら 
CALL し ます 。25V の ON-OFF な ど は 考え 
て いな い の で , C021H に 書き 込む 値 の 上 位 
2 ビッ ト に は 注意 が 必要 で す 。 
⑥C030- (Data set) 

ROM の デー タバ ス (ボー ト A) に デー 
タ を セッ ト し ます 。C031H に セッ ト し た い 
デー タ を 書き 込ん で CALL し ます 。 ポー ト 
A が 出力 に 設定 され て いな いと 無効 に な り 
ます の で 注意 し て くだ さい 。 
⑨C038 (Send program pulse) 

書き 込み 時 の プロ グラ ム パ ルス , 読み 出 
し 時 の CS (チッ プ セ レク ト ) を 行い ます 。 行 
つて いる こと は , ビッ ト セ ッ ト ・ リ セッ トモ 


ー ド で , PCe を 1 に し た 後 ,.0 に し て いる だ 
4 は CN おら 
⑲C048 一 (Read data from ROM) 

ROM の デー タバ ス (ポー ト A) か ら 6 デ 
ー タ を 読ん で , C04FH に 書き 込み ます 。 
ポー ト A が 入力 に 設定 され て いな いと , 読 
み 出 す 意 味 が あり ませ ん 。 
@C050- (High voltage ON) 

25V を ON に し ます 。 ビ ピット セッ ト ・ リ 
セッ トモ ー ド を 使っ て , PC? を 是 に し て い 
る だ け で す 。 
C058 - (High voltage OFF) 

25V を OFF に し ます 。PC7 を 上 し に する 
わけ で す 。 

以上 の 機械 語 ル ー チ ン を BASIC か ら 
CALL す る か だ た ち で , この プロ グラ ム は 動 
作 し ます 。 BASIC 部 は , あえ て 説明 する ほ 
と の こと も お な いで 5 は 5 うき 

最後 に . ROM の 書き 込み 方 を 説明 し て , 
今回 は 終わ り に し まし ょ う 。 

まず , ROM を 20 分 位 . イレ ー サ に か け 


コン トロ ー ル プロ グラ ム の アセ ンプ ブル リス ト 


で て 。 8 潮 天 あま 本 江 

続い て , ROM ライ タ と MZ を つなぎ , 
ROM ライ ターMZ の 順に 電源 を 入れ て , 
BASIC を ロー ド し ます 。 

プロ グラ ム を 入力 し , RUN し て 下さ きい 。 
メッ セー ジ が で た だ た ら 6。 ROM を ソケット に 
入れ て , W を 押し ます 。 

書き 込む デー タ や プロ グラ ム の 先頭 アド 
レス , 最終 アド レス , ROM の 書き 込み 開 
始 アド レス (0 一 7FF) の 順に 16 進 数 で 指定 
。 を だ だ 季 ま ます 。 

書き 込み が 終了 する と , コマ ンド 待ち に な 
り ま す の で , 今度 は R を だ た たい て 。 正しく 
書き 込ま れ た か チェ ッ ク し て て だ きい 。 
読み 出し を 中 断 し た いと き は , 任意 の キー 
を 押し つづ けれ ば , 一 行 分 の 表示 終了 後に 
コマ ンド 待ち に 戻り ます 。 

機械 語 を 扱え る よう で し た ら , 先 に 作っ 
た CPU ボー ド と LED ボード, メモ リボ 
ー ド を 接 い で , LED を 点 減 き せる プロ グ 
ラム を 作っ て みる と 面白 いで し ょ う 。 


PAGE 1 
E STNR ADRS UEBJECT 


ー BUURCE STATEMENTS 


1 日 
4 3 P-RDM MRITER CDNTRULE PRUGRAN 
さ 日 
4 日 198 さ /10/UB。 
5 0Q00 PRTA EQU OOH 
6 O001 PDRTE EQU  O1H 
7 0002 PQRTC EQU  O2H 
B OO0 さ CTRLP ERU  O3H 
9 OO0OO DUMMY EQU OOOOH 
1O 
11 COOO "MMODE ERBU  OCOOOH 
12 CO1O RMQDE EQU  OCO10H 
1 さる CO2O DSET EQU  OCO20H 
14 CO3O DASET EQU  OCO30H 
15 COSB PRDGP ERU  OCO3BH 
16 CO4 FRDaTA EQU  OCO4 ヨ H 
17 CO5O HVUN ERU  OCO5OH 
18 COS ヨ HVQ ロ FF EGRU  OCOS ヨ H 
19 
20 OOOO DRG MMDDE 』 SET MDDE TO REaD 


21 COOO 3E9O 
22 COO2 D3O さ 
2 さ COO4 3E40 
24 COO6 D302 
25 COO8 C9 


27 COO DRG 


28 CO1O0 3E8O 
29 CO12 D3O さ 
さ O CO14 3E4 晶 
さ 1 CO16 D302 
さ 2 CO18 C9 


さ 4 CO19 ORG 


さ 5 CO2O 210000 
さ 6 CO23 7 ヒビ 

さ 7 CO24 D302 
3 CO26 7D 

さ 9 CO27 D3O1 


LD 人 10010000B 
DUT (CTRLP) 。 谷 
LD 内 01000000B 
DUT (PORTC) aa 


RMDDE 』 SET MDE TO MRITE 
LD 台 。 10000000B 
DUT (CTRLP) 。 aa 
LD 人 01001000B 
DUT (PORTC) 。R 全 


RDSET 』 DRESS SET 
< LD HL 。 DUMNY 


LD 谷 ぅ 日 
ロ UT (PORTC) 
LD 向上 し 


ロ UT (PORTB) 。 谷 


ハー ド 入 門 ぎ ざ Z 


DaTR SET 
as DUMIY 
(PORTA) 。 台 


SEND PRUGRANM PULSE 
全 。OO001 100B+1 
(CTRLP ) 』 谷 

全 。00001100B+O 
(CTRLP) 。 代 


RERD DATR FRONM RON 
人 Q。 (PORTA) 
(OEO4FH) 。 代 


HITBH-VHLTRBE N 
asOO0O1111B 


ロ BJECT SDURCE STATEMENTS 


D3 さ OS HUT (CTRLP) 。 谷 


ヒ 9 RET 


RG  HVOFF 
3EOE LD 
D さ O さ DUT 
CC RET 


ERRURS 


BYNMB ロ L SYIMBDL SYMBDHL 


DSET CTRLP DaSET 


DUMNMY 


HVDFF HVDN 


PORTa PQRTB FORTC 
PRUBP RDATa RMUDE 
MMODE 


ROM ラ イタ ー コ ント ロー ルプ ログ ラム 


1000 
1010 
1020 
1030 
1040 
1O5O 
1060 


FUR =O TO &HSF 

REQD 人 $:POUKE &HCOOO+ エ 。 VaL(" 
NEXT + 
RDRS=&HCO2 1 : DDUT=&HCO さ 1 
RDAT=&HCO4F 
CALL &HCOSB:s BUSUB "MTT" 
BEEP 
CaLL &HCOOOs BUDSUB "MTT" 
PRINTEPRINTIPRTNT " ネネ ネネ ポポ 


LABEL "MRTN" 

CALL &HCO58 

BEEP 

CaLL &HCOOOs BDSUB "MTT" 
PRINTEPRINTEPRINT "COMIMaND 
PRINT 全 

IF まま ="R" THEN BOTD"READ" 
IF 介 ="M" THEN BUTOU"MRITE" 
BEEPs BUTO"MQIN" 


LaBEL "READ" 
CaLL &HCOOO 


5 HIGH-V ロ LTQBE OFF 
人 OO00O1 1 10B 
(CTRLP) 。 人 


RDRS 


CO さ O 
COS5O 
OO002 
CO1O0 


&H "人 征 ) 


NAKE RERDY RDMMIRTTER * ネ ポポ ボボ ネリ 


"3 人 ま =INFUT 証 (1 ) 


PRTINTs INPUT "READ FRUNM "3 人生 


=VQL( " &H"+ 人 も ) 


IF S く <O _nR S>&HZFF THEN BEEPGDTU"MAIN" 


PRINT 

PRINT "ADRS +O +1 +2 + さ +4 +5 
T=Q 

PRINT 

IF INKEY ま まく >"! THEN BUTD"MaTIN 
PRINT RIGHT も ("OOO"+HEX も (8) 。 人 4 


@@ ohiMZ 1983.10. 


+6 + プ " 


)s 


=O 
仙 和 ま RTGHT 和 まま ("OOO"+HEX 和 ま (5) 。 人 4) 

人 =VnL( "&H"+RTGHT も (もつ ) ) 

介 H=VaL ( "HH"+LEFT 生 (まつ ) ) 

BSUB "BREAD" 

PRINT " "iRIBHT ま ("0 リ +HEX ま (DA) 。2) s 
= ヨ + 1 

エニ エ +1 

IF SB:>&HZFF THEN"MaTN" 

IF 1> プ THEN PRINT:GUTO 1290 


ーーーーーーーーー MRTTE RUM ーーーーーーーーー 
LaBEL"MRITE" 
CaLL &HCO1O 

CALL &HCO5O: G ロ SUB"MATT" 


A ま こい r 

PRTNT: INPUT "PRDGBRAM FRDM "iQ ま 
INFUT" TO "j ビ ま 
TINFUT" MRITE FRDM "5i* 

MS=VAL("&H"+ 人 ま ) : RB=VQL ("日 "も ) 


ME=VaL ( "&H"+ じ まう) 


FRINT 

PRINT"  aDRS  : DaTA  " 
PRIND は ニー ニニ ニニ ニニ ニー ニニ ニニ ーー エー 
LABEL "ML ロ P" 


RG ま =R1GBHT ま ("OOO"+HEX 和 (RS) 。4) 
QRH=VaL( "&H"+LEF 丁 (RG も 。2) ) 
人 L=VL ("&H"+RTBHT 和 まま (RB ま 。2) ) 
IF aH>&H7Z THEN BT"MRIN" 
Da=PEEK (NM5) 

BUSUB"BMRITE" 
R5=R5+ 1 : MS=M5+ 1 

IF MS<=NME THEN "MLOF" 
BEEP 

CaLL %&HCO5 
BODTO"MaRTN" 


LABEL "BMRITE" 


FDKE &HCO21 AL 
POKE &HCO22。 AH+&HBO 

CALL &HCO2O 

POKE &HCOS1 DA 

CaALL %&HCEO さ O 

CaLL &HCO3 

BOSUB"MATT2" 

PRINT " 。 "s 

PRINT RIBHT$("OOO"+HEX$(R5) 。4) 5 
PRINT " = 

PRTNT RIGHT ま ("O"+HEX$ ま (DAQ) 。2) 


LABEL "BREaD" 

CALL &HCOOO 

PUKE &HCO21 。 人 AL 

PUKE &HCO22。RH 

CALL &HCO2O 

CaLL &HCOSB: CRLL HEO48 
DaQ=PEEK(&HCO4F ) 

RETURN 

LABEL "MTT" 

FOUR LUP=1 TU 2OOENEXT LOP 
RETURN 

LaBEL "MAIT2" 

FR LUP=1 TO 7OINEXT LOP 


DQTA 3 さ E』90D3』 0 ささ E』 40 D さ 。 02 
DRTA 9。OO。FF OO。FF : OO0。FF OO 
DATa さ 3E。 0O。 D さ 。 O3。 さ E 。 4 日 。 D さ 。 02 
DRTQA C9。』00』FF 。OO。FF。OO。FF 』00 
DQTQ 21』00』 00。 7 ビ 。D さ 02 。 7D』D ミ 
DQTA O1』C9』00。FF』O0。FF OOFF 
DATQ さ E』O0』D3』 00』C9。FF 。 00FF 
DQTA さ E。OD。D さ 。 03 さ 。 さ E OF D さ 。 O さ 
DQTQ C9。』FF』OO。FF OO FF 。 OO FF 
DQTQ DE。OO』 さ 2。4F CO』 ビワ ュ O0。FF 
DQTQ さ E。OF 』D さ 。 O さ ょ ビ 9。FF 。 O0FF 


. DATA さる E。』OE ょ D さ 。 O3。 ビワ 9 ょ 00 FF。 OO 


ハー ド 入 門 @ ひ の 


Z-80 機械 語 へ の 誘い 


> ハバ 


DEUS EX MACHINA 
連載 第 13 回 


実央 編 


この 連載 の パタ ー ン か ら す る と , まえ が 
き に ,「 前 回 の 実践 編 で 解説 し た キー 入力 用 
モニ タ ・ サ ブル ー チ ン を 使用 し て 、 簡 単 な 
プロ グラ ム を つく っ て み ま し ょ う 」 と 書い 
て , 20 一 30 行 程度 の ゲロ グラ ム を 掲載 し て , 
今回 は お し まい に な る は ず で す 。 し か し , 今 
回 は パタ ー ン を 脱し て ,「 キ ー 入 力 」 の 他 に 
「 画 面 表示 」 の 知識 も 利用 し て , いつ も より 5 
大 き な プ ログ ラム を 作っ て み ま し た 。 
これ で は 少し も パタ ー ン を 脱し て いな いこ 
と に な る か な 。 


/ 各 プ ロ プ ラム に つい て 


・「PROGRAM 1-A」 

MZ-80K/C, MZ-1200 用 ゲロ グラ ム 
・「PROGRAM 1-B」 

MZ-700 用 プロ グラ ム 
・「PROGRAM 1-C」 

MZ-80B 用 プロ グラ ム 
・「PROGRAM 1-D」 

MZ-2000 (MZ-2200) 用 プロ グラ ム 
これ ら 5 の プロ グラ ム は ,「 キ ー 操 作 に よっ 
て , 画面 に 表示 され た キャ ラク タ を 動か す 」 
と いう ,。 TV ゲー ム の 基礎 (?) と も 言う で 
き プ ログ ラム で す 。 簡単 な ゲロ グラ ム で す 
が , いろ いろ な こと に 応用 で きる と 思い ま 
す 。 


/ プロ グラ ム の 実行 方 法 


①7000H 番 地 か ら ス ター ト さ る せま す 。 
② 画 面 に , 
「SPEED (0 一 9) ? 口 」 
と 表示 し て , キー 入力 を 待っ て いる の で , 
「0 」 か ら 「9」 ま で の 数 字 キ ー を 押し て 〈 
9 の oniMz 1983.10. 


長瀬 敏之 


「 キ ー 入 力 ( そ の 2)」 


くだ さい 。「0」 が も っ と も 速く ,。「9」 が 
も っ と も 遅い スピ ー ド を 表し ます 。 
入力 例 
SPEED (0 一 9) 2? 7|CRI 
③ 画 面 に 「@」 と いう キャ ラク タ が 表示 され 
まず 。 
④ カ ー ソ ルキ ー (1 } 一 っ ) を 押す と , その 
方 向 に 「@」 が 移動 し ます 。 移動 する スピ 
ー ド は , ② て 入力 し た 値 に よっ て 決ま り 
ます 。 た だ し , 画面 の 端 に くる と , それ 
以上 は 動き ませ ん 。 
⑤ モ ニタ (0000H) に 戻り た いと き は , 
[SPACE| キー を 押し て くだ さい 。 


/ プロ グラ ム の 解説 


@PROGRAM 1-A 

7000 一 画面 を シク リア し ます 。 

7005 一 「DATA 2 」 が 示す 番地 に ある アス 
キー コー ド の 列 を 表示 し ます 。 つ 
まり ,『SPEED (0 一 9) ?」 
と いう 文字 列 を 表示 し ます 。 
キー 入力 を 行なっ て , 入力 し た 文 
字 を 「DATA 3 」 が 示す 番地 以降 に 
転送 し ます 。 だ だ し 。 「GCALL 
GETL」 は , ライ ン 入 力 を 行なう 
モニ タ ・ サ プ ブルー チン な の で , キ 
ー 入 力 し た 文字 の 他 に , その 行 に 
表示 され て いる 文字 も 取り 込み ま 
す 。 つまり, 「DATA 3 」 が 示す 番地 
以降 に は , 


SPEED(0-9) ? O[CRI 
し 入力 し た 文字 


700B 一 


と 書き 込ま れ ま す 。 


7011 一 入力 し た 文字 を , レジ スタ A に C 代 


7015 一 


701D 一 


7025 一 
702A 一 


入 し ます 。「DATA 3 二 OEH」 と し 
た の は , キー 入力 し た 文字 が , を 
の 番地 に 書き 込ま れ て いる た めで 
衝 。 

む の が 
「SPEED (0-9) ? ORI 


001020304050607080.0A0BOCODOE 


LTDATA 3 」 番 地 


入力 し た 文字 が , 0 一 9 (アス キ 

ー ユ コード で 30H-39H) まで の 数 

字 で な けれ ば , 「L P01」 へ ジャ ン 

プ し て , 再 入力 し ます 。 

また ,「SUB 30H」 を 実行 し て い 

る の で , レジ スタ A 内 の アス キー 

ュー ド (30H 一 39H) は , 数 値 (00 

H 一 09H) に 変換 きれ ます 。 

(レジ スタ A の 内 容 ) X 4 X256 十 1 

の 値 を , 「DATA 1 」 が 示す 番地 (2 

バイ ト 分 ) に 代入 し ます 。 

た と え ぇ ば, キー 入力 の と き に 入力 

し た 廊 字 が , 

「0 」 な ら ば , (DATA1 ) =0001H 
三 1qn0) 

「1」 な ら ば , (DATA1) =0401H 
1025quo) 

に な り ま す 。 

画面 を クリ ア し ます 。 

各 レ ジス タ に 初期 値 と し て , 次 の 


値 を 代入 し ます 。 

B =OOH 「@」 を 表示 し て いる 
r 座 標 (00H 一 27 
H) 

C =OOH 「@」 を 表示 し て いる 
9 座標 (00H 一 18 


7037 一 


703A 一 


703D 一 


7054 一 


705F 一 


H ) 

DE=0028H 1 行 の 文字 数 (10 進 
数 で 40) 
HL=D000H「@」 を 表示 し て いる 

V- RAM 上 の 番地 
(DO000H 一 D3E7H) 
「@」 の ディ スプ レイ 
・ コ ー ド 
「WAIT」 と いう サブルーチン を 実 
行 し まず 。 
キー ボー ド か ら 。, 
ます 。 
も し , 押さ きれ て いる キー が , 
「 人 ト 」( ア スキ ー コ ュー ド ・12H) な ら 
ば , 「PROGU」 へ ジャ ンプ 
「!」( ア スキ ー コ ュー ド ・11H) な ら 
ば , 「PROGD」 へ ジャ ンプ 
「-」( ア スキ ー コ ユー ド ・14H) な ら 
ば ,「PROGL」 へ ジャ ンプ 
「 っ 」( ア スキ ー コ ユー ド ・13H) な ら 
ば ,「PROGR」 へ ジャ ンプ 
「SPACE」( ア スキ ー コ ー ド <・20H) 
な ら ば , 0000H 番 地 へ ジャ ンプ し 
まず 。 
それ 以外 の キー が 押 き れ て いる と 
き や , どの キー も 押 き る れ て いな い 
と き は , 「LP02」 へ ジャ ンプ "し ます 。 
時 間 消 費 (浪費 ?) サブ ルー チン 
で す 。「DATA 1 」 に 代入 きれ た 値 
の 数 だ ど だけ ルー を 繰り 返し て , リ 
ター ン し ます 。 
画面 に 表示 し た 「@」 を , 
移動 きせ る ルー チン で す 。 
まず , 「@」 が 画面 の 上 端 に ある か 
と どう か 調べ て , も し 上 端 に ある な 
ら ば (C=00H), 移 動 で き な いい の 
で , 何 も し な いで 「L P02」 へ ジャ 
ジジ し まず 。 そう で な け ば (0G 
巡 00H),「@」 を 消し て , その 1 行 
上 に 「@」 を 表示 し た 後 ,「L P02」 
へ ジャ ング し ます 。 
注 : プロ グラ ム を 短く 《 す る た め に , 
「D=00H」 で ある こと を 利用 
| 貞 6 
「LD (HL), 00H」 


A' =55H 


1 文字 を 入力 し 


1 行 上 に 


の 代わ り に , 
「LD (HL), D」 
を 使っ て いま す 。 


また だ, 「@」 の 消去 は , 前 述 の 


「LD (HL), D」 

で 行ない , 「@」 の 表示 は , 

「LD (HL), A」 

で 行なっ て いま す 。 
画面 に 表示 し た 「@」 を , 1 行 下 に 
移動 きせ る ルー チン で す 。 
まず ,「@」 が 画面 の 下端 に ある か 
どう か 調べ で て, も し 下端 に ある な 
ら ば (C 三 18H), 移動 で き な い の 
で , 何 も し な いで 「LP02」 ヘ ジャ 
シグ デ し ます 。 そう で な 選ば で 
学 18H),「@」 を 消し て , その 1 行 
下 に 「@」 を 表示 し た あと ,「LP02」 
へ ジャ ンプ し ます 。 
画面 に 表示 し た 「@」 を , 1 列 左 に 
移動 きせ る ルー チン で す 。 
まず ,「@」 が 画面 の 左端 に ある か 
どう か 調べ て , も し 左端 に ある な 
ら ば (B 三 00H), 移動 で き な い の 
で , 何 も し な いで 「L P02」 ヘ へ ジャ 
ンプ し ます 。 そう で な けれ ば (B 
孝 00H),「@」 を 消し て , その 1 列 
左 に 「@」 を 表示 し た あと ,「LP02」 
へ ジャ ング し ます 。 
画面 に 表示 し た 「@」 を , 
移動 きせ る ルー チン で す 。 
まず ,「@」 が 画面 の 右端 に ある か 
どう か 調べ で て, も し 右端 に ある な 
ら ば (B 三 27H), 移動 で き な い の 
で , 何 も し な いで 「L P02」 ヘ ジャ 
ンプ し ます 。 そう で な けれ ば (B 
孝 27H),「@」 を 消し て , その 1 列 
右 に 「@」 を 表示 し た あと , 「LP02」 
へ ジャ ンプ し ます 。 
@PROGRAM 1-B 

7000H 番 地 の 命 令 を 除け ば ,「PROGRAM 


1- A」 と 同じ で す 。7000H 番 地 の 命令 に よ 
り , 強制 的 に モニ タ を ROM に し て , D000 


706D 一 


707A 一 


7086 一 1 列 右 に 


H 番 地 以 降 を V-RAM に し ます 。 その た め , 
ROM の ある 番地 や , D000H 番 地 以降 に ス 
タッ ク ・ ポ イン タ が ある と , この プロ グラ 
ム は 実行 どき ませ ん 。 

この た め , S-BASIC や Hu-BASIC の モ 
ニタ ・ コ ユマ ンド 「G」 を 使用 し て 実行 し た 場 
合 は , スタ ッ ク ・ ポ イン タ が , FFFFH 番 
地 に ある こと か ら , スタ ッ ク ・ ポ イン タ を 
新た に 設定 し な けれ ば 桑 走 し て し まい ます 。 

な お , この プロ グラ ム 終 了 時 に は ,.ROM 
モー ド の モニ タ に ジャ ンプ し ます の で , こ 
ちら 5 の M コ ユマ ンド で 入力 し て G コ マン ド で 
実行 し た ほう が よい で し ょ う 。 
@PROGRAM 1-C 

番地 が ずれ て いる けれ ども ,「PROGRAM 
1- A」 の 解説 を 読め が, この プロ グラ ム の 内 
容 も わか る と 思い ます 。 特 記す べき 点 は 以 
下 の と お ぉ お り で す 。 
702A 一 V-RAM を メイ ン ・ メ モリ に つなぐ で 

命令 で す (連載 で 説明 済み )。 


7041 一 「 リ ピー ト に つい て 」 を 読ん で くだ 
さい 。 

705F ド ー 「 リ ピート に つい て 」 を 読ん で くだ 
きい 。 


ePROGRAM 1-D 
「PROGRAM 1-C」 の 解説 を 読ん で くだ 
る い 。「702Eー702F」 が 違う だ け で す 。 


/ リピ ビ ピード に つい て 


前 回 の 実践 編 (8 月 号 ) で , 参考 プア ログ 
ラム と し て , MZ-80K/C 等 の 「REPEAT 
ON」・「REPEAT OFF」 プ ログ ラム と, 
MZ-80B 等 の 「REPEAT OFF」 プ ブロ グラ 
ム を 掲載 し まし た (を そこ まで は よかっ た /)。 

7 月 下旬 の ある 日 , 「Oh! MZ 8 月 号 」 
を 読ん だ 可児 市 の 基 先 輩 、 い わく ,「MZ- 
80B・MZ-2000 用 の 『REPEAT ON』」 プ 
ログ ラム は どー な っ と る ん や ? 」( 言 われ て 
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し まっ た /) 
そん な わけ で すか ら , この 章 で 前 述 の 部 
分 を 補い た いと 思い ます 。 


MZ-80B, MZ-2000 の モニ タ ・ サ プ ブルー 
チン (CALL GETKY) を ,「REPEAT 
ON」 の 状態 に し た いと き は , 

(0952H) =00H 
に し て 《 だ きる い 。 も と に 戻す と き は , 


(0952H) =AeH 

だ も ます 。 

し か し 。 こむ は テー プ BASIC や デオ ス 
ク BASIC の SB-1520 (MZ-80B), MZ-1 
Z001M (MZ-2000)0 と いう モニ タ で 使え る 
方 法 で す 。 

Paseal. テー ビジ シス テム デ ョ ログ ラム 。 E- 
DOS な どの SB-1521 (MZ-80B)、 MZ-2Z 
004A (MZ-2000) で は 正常 に 動作 し ませ ん 。 


** ネ  Z8g HSSEFBLER SP-2192 PHGE ロロ 1 *※* 玉 


999g 

99g9g 

99gg 

9999g 

ggg9g 

99 ロ 9g 

99 ロ 9 

15 

SISI 

7gg 3E16 
792 CD1 ジ BB 
gg5 

7g ロ 5 11357 
7gg8 CD15 ロ gg 
7ggB 11 ロ 4 
gaE CD ロ さ gg 
7g1 1 

7B14 

g15 

7g1? 

7g19 

7g1B 

7g1D 

791E 

7g1F 

7B2 ロ 

7922 229379 
79g25 

7g25 SE16 
7927 CD12gg 
92H 

7g2H 1 ロロ 9g 
7g2D 

79 さ 9 

7 ささ 

7g35 

7936 

3 ァ 

7g さ アァ 

93 

7937 CDS47 
793H CD1E ロ gg 
79g3D FE1S 
793F 281E 
7g41 FE11 
7943 2828 
7945 FE14 
947 28 く 1 
949 FE1 さ 
7g4B 2839 


j FRIGRHH 1-H 
MI どー8BgK ン / ビ 。 間 ど ー129 ロ 


rgH 


H: 1EH 
gg12H 


DE : DHTHZ 
gg15H 

DE : DHTH さ 
ロロ ロミ H 

DE : DHTH3+ ロ EH 
Hz: KDE) 

さ gH 

に ,LPg1 

gHH 
NEC:LFBg1 

日 : 日 

日 : 日 

H: 日 

L:1H 
*EHTH1).HL 


日 16H 
12H 


BC: ロロ ロロ H 
DE , gg28H 
HL : ggH 
H: 5SH 
HL ) 日 
HF:HF“ 


MHIT 
gg1BH 
12H 

ご 〆: PRDGU 


有 : FRUGR 
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91 794D FE29 
2 794F 29E6 
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CF っ 2gH 
JR NHZ:LP92 


注意 し て くだ さい 。 


あと が き 


次 回 は , 基礎 編 「16 ビ ッ ト 演 算命 令 」 を 了 予 


定 し て いま す 。 実 践 編 は お 休み で す 。 


3 URG ggH 


日 =16H=CLR 
CHLL FRNT 


3 DE=DHTH2 

5 CHLL IHSG 

3 DE=DHTH ミ 

5 CHLL GETL 

3 DE=DHTH3+gEH 
3 日 =CDE> 

} 日 =H- さ 9H 


IF CY=1 GT LFg1 


3 IF CV=g BHT LPg1 
3 日 = キマ 

3 日 = 日 2 

) H=H 

5 上 し =g1 晶 

5 て DHTH1 )=HL 


) =16H=CLR 
j CHLL FRNT 


? = ロ gH: ビニ = ロロ 日 
3 DE= ロ 28SH 

) HL=DgggH 

) =55H=a 


(HL ぅ = 日 = 


3 SMHP RF:HF“ 


ei 


に し 


BSLBE MMHIT 

CHLL BETK 

UF 

IF 〆=1 GT PROGU 
DOMIN 

IF ご =1 GOTO PRQGD 
LEFT 


ITF 〆=1 GOTQ PRQOGL 
RIGHT 
IF ご =1 GOTO FROGR 


SPHCE 
IF Z=g BOTO LFGZ 


9 さ 7951 CS3gg9g YP ggggH GOTOU ggggH 


we 


て SP)=HL 
HL=CDHTHR1 


HL=HL-1 

H=H 

H=H URL 

IF Z=g GOTU LPGgS 
HL=XSP> 

RETURN 


ES HL 
2H9379 HL: CDHTH1 > 


HL 

H:H 

証 
NZ,LFgS 
HL 


LET 


ee 


H= ロ gH 


IF 〆=1 GOTO LP92 
ヒ =C じ ー-1 

て HL >=D 

ビリ =9 
HL=HL-DE- じ "=HL-DE 
SlMRP _HF:HF < 

て HL 〉= 昌 

SMHP _HF:HF 

GUT0U LPGg2 


PO 


昌 =18H 


IF ご =1 GTQ 
に = に +1 
〈HL)=D 
HL=HL+DE 
SlMHF HF:HF" 
HL ぅ = 昌 

SMHF _HF:HF“ 
GOTO LPGg2Z 


H=ggH 


IF 〆=1 GTO 
BE=B-1 

(HL )=D 
HL=HL-1 
SMMHP_HF:HF“ 
て HL )= 昌 H 


・ 
き 
品 
日 
品 
w' ま 
品 
人 
申 
4 
円 
ロ 
ロ 
日 
品 
日 


*※  Z89 HSSEMBLER SP-2192 PHGE さく * ボ キネ 


RF:HF“ SlMHP HF,HF* 
LPg2 GUTO LFg2 


PROGR: 
=27H 


IF 〆=1 GT 
B=B+1 
(HL)=D 
HL=HL+ 1 
SlMHP RF:HF“ 
HL )= 昌 

SluHP _HF:HF^ 
BOT0 LPGg2 


昌 , 27H 
B 
Z, LP92 
B 
CHL),D 
HL 
F,HF 
HL), 昌 


RF,HF* 
LPg2 


ai 


18 7993 gg99g DEFIUU ggggH 
19 7995 DHTH2I ENT 
2 7995 535g4545 DEFM “SPEED 〈9@-9) ? < 


っ 1 7999 442928 く 9 

22 7Z9@9D 2D3 さ 92929 

2 くさ 79H1 さ F29 

24 79H3 9D DEFB  gDH 
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25 Z9H4 DRTH さ : ENT 


END 


ee ee ea 


7g99H 
DSE4 〈E4H):H 


3E16 日 16H 
CD1299 gg12H 


119779 DE : DRHTH2 
gg91SH 
DE:DHTHS 


ggg3H 
DE : DHTH3+9EH 


URG 79g9H 
て RONM: り -RRIN) 


H=16H=CLR 
CHLL PRNT 


DE=DHTRH2 

CHLL MSG 
DE=DHTH3 

CHLL GETL 
DE=DHTH3+9EH 
H=CDE> 

昌 =H- さ 9gH 

IF CV=1 GOTO LP@g1 


IF CV=g GOTO LFg1 
H=H* ネ 2 

に 日 2 

H=H 

L=91H 

2295Z9 DRTH1):HL 〈DHTH1 )=HL 


SE16 H。 16H HH=16H=CLR 
CD1299 gg12H 3 CHLL PRNT 


BC 。 ggH B=g9H: じ =9gH 
DE : g928H DE=992SH 

HL , D999H HL=Dg99H 

HH: 55H H=S5SH=a 

て HL > : 日 て HL ぅ =H=3 

RF RF“ 3 SlMHF HF:RF“ 


に 1 
に 


ロ 
3 
ロ 
す 
ロ 
3 
テ 
日 
* 
き 
3 
ロ 
日 
則 
ァ 
ます 
き 
ま # 
き 
* 
? 
昌 
テ 
品 
* 


に 


CDS67@9 GOSUB MMHIT 

CD1BGg9 CHLL GETKV 

FE12 5 UP 

281E IF Z=1 GOTO PROGU 
FE1 1 5 DOMIN 

2828 IF ご =1 GUTO PROGD 
FE14 LEFT 

2831 Z: PROGL IF 2=1 BOTO PROGL 


**  Z89 HSSEMBLER SP-2192 PHGE 92 ** 


1 7Z94B FE1 さ CP 13H 3 RIGHT 

g2 7Z94D 2839 JR Z: PRUGR 5 IF 2=1 GOTO PROGR 
3 794F FE29 CP 29H 5 SPHCE 

g4 7951 29E6 JR NZ LF92 3 IF Z=9 GOTO LP92 
g5 ?953 CS3999G JP 9g99gH 3 BHT 9999H 

g6 7956 5 

7 79S56 MHIT: ENT 

g8 7956 ES PUSH HL 3 CSP) う =HL 


9 ohiMZz 1983.10. 


9 Z957 2H957Zg LD HL : DRTH1 > 3 HL=CDRTRH1 > 


HL 

HH 

L OR 
IF Z=9 GOTO LPF@S 

HL=〈SP> 

RETURN 


=ggH 


IF Z=1 GOTO LP92 
ヒ = ヒ ー1 

HL >=D 

"=9 
HL=HL-DE-C"=HL-DE 
SMHP _HF:RF“ 

HL 〉=H 

SMHP RF:RF< 

GOTO LP92 


ee 


H=18H 


3 ITF 〆=1 GOTOU LP9g2 
に = じ + 1 

3 (HL)=D 
HL=HL+DE 
SMHP HF:HF" 
(HL ぅ = 昌 
SMHP HF:RHF 
GOTO LPGg2 


FRUGL * 


3 昌 =9gH 
IF 〆=1 GOTO LF92 
j B=B-1 


(HL)=D 
35 HL=HL-1 


SlHP_HF:HF“ 
〈HL 〉= 昌 
5) SlMHP HF:HF“ 
3 GOTO LFg2 


3 日 =27H 


IF ご =1 GT LFg2 
) B=B+1 
ぅ て HL)=D 
HL=HL+ 1 
3) SMHP HF:HF“ 
て HL 〉=H 
) SMHP RF:HF“ 
3 GUTU LFg2 


DTH1: 


DHTH2 
535g4545 SPEED 〈9-9) ? “< 
442 ロ 283 昌 
2D39292g 
3F2@g 
gD 


マシ ン 語 魔神 語 の ぢ 
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PRUGRHN 1-C 
NMZ-89B 


LET 


gg9H 


H: 96H 
g8C6H 


DE:DHTH2 
9889H 

DE : DHTHS 
g6H4H 

DE : DHTH さ +gEH 


ORG 7Z999H 


HH=g6H=CLR 
CRLL PRNT 


DE=DRTH2 

CHLL MSG 
DE=DHTHS 

CHLL GETL 
DE=DHTH3+GEH 
=〈DE > 

H=H- さ gH 

IF CV=1 GOTO LF9g1 


IF CV=g GOTO LF91 
日 = ロホ 2 

日 =H*2 

H=H 

L=g1H 

DRHTH1 ぅ =HL 


H=g6H=CLR 
CHLL PRNT 


昌 =+" - ト 〈ESH> 
U-RHM て CHDR> 

り -RHN て DgggH- > 
U-RRN て 49〉 

中 " - ト CESH)= 昌 


B=ggH, =ggH 
DE=9928H 
HL=Dg99H 
ロー オロ H=3 

て HL >=H ロ = る 
SMRP RF:RHF^ 


PT 


PT 


*PHTH1):HL 


HH 6H 
g8C6H 


H: て ESH> 
アッ > 
6: 日 
5 日 
(ESH) 日 


we we we ws ve 


9199Bg BC dgH 
1128 ロ gg DE : 9928H 
219gDg HL : Dg9gH 
3E49 H: 4gH 
7Z CHL 〉 日 
g8 HF:HF < 


CO まま 1 


日 =9gH 
9952H)= 昌 


HF | 
さ 25299 て 952H) 日 


*※  Z89 HSSEMBLER SP-2192 PHGE 2 * 


CD3298 GETKV 

U 

IF Z=1 GOTO PROGU 
DOMN 

IF Z=1 GOTO PROGD 
EEFT 

IF 2Z=1 GOTO PROGL 
RIGHT 

ITF Z=1 GOTO PROGR 
SPHCE 


IF Z=9 GOTO LPGg2 


eee 


H=H6H 
て 952H) 。 日 て 952H)=H 
ggg9H GOTO 9g999H 
17 7967Z ES FUSH HL 5 (CSP ぅ =HL 
18 7968 2HH67g LDb HL: CDHTH1 ぅ 5 HL=XDHTR1 ぅ 
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HL=HL-1 

H=H 

H=H OR L 

IF Z=9 GOTO LPg さ 
HL=XSP> 

RETURN 


H=ggH 
ITF 2=1 GOTO LPg2 


に = ビー1 

CHL>=D 

CV=9g 
HL=HL-DE-CY=HL-DE 
SMHP RF:RF“ 

(HL )=H 

SlHP RF:HF* 

GOT0 LF92 


ee 


昌 =18H 


IF Z=1 GOTO LP92 
C=C+ 1 

〈HL)=D 

HL=HL+DE 

SMHP HF:RHF“ 

(HL >=H 

SMRHP RF:RHF“ 


we 


**  Z89 HSSENMBLER SP-2192 PHGE 9 くさ 


GOT0 LP92 


PROGL: 
日 = ロ 9H 


IF Z=1 GOTO LP92 
E=B-1 

〈HL>=D 

HL=HL-1 

SlMHP RF:HF“ 

て HL >= 昌 

SMMHP HF:RF* 
GOT0 LP@2 


TE 


5 日 =2ZH 


IF Z=1 GOTO 
=B+ 1 
〈HL)=D 
HL=HL+1 
SlMHP FF:RHF“ 
3 CHL)= 昌 
SMHP HF,RHF* 
GOTO LPGg2 


DRTH1: 


DRHTH2s 
535g4545 SPEED 〈9-95 2 イツ 
44292839 
2D さ 92929 
さ F2g 
gD 


DHTRHSs 
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* ネ 289 HSSEMBLER SP-2192 PRGE 91 


22H679g 


さ E96 
CDC6g8 


DBE8 
CBFF 
CBFr 
CBHF 
DS3ES 


1 ロロ 
1128 ロ gg 
21 ロ gDg 
3E49g 
アア 

g8 


RF 
325299 


CD6 ァ 7g 


PROGRHIM 1-Db 


NZ-2999。 (MM プ -2299) 


* ネ 289 HSSEMBLER SP-2192 PHGE 92 


CD3298 


玉 玉 


gg9gH 


日 : 96H 
98C6H 


DE: DHTH2 


*DHTH1):HL 


H: 96H 
BS8C6H 


H: て ESH ぅ 
> 日 


6: 日 
コ 9 日 
(ESH):H 


EC: ロロ H 
DE : Bd28H 
HL : bgggH 
日 : 4 ロ H 
HL ) 日 
HF:HF“ 


H 
( ロ 952H) 日 


玉 ※ 


9832H 
9g2H 
Z: PROGU 
g1H 

Z: PROGD 
94H 

Z: FROGL 
g3H 

Z, PROGR 
2gH 

NZ LP92 
H: H6H 


て ロ 952H) 日 
gggH 


HL 
HL: (DRTH1 ) 


ea we we 


に 


に DK TK あま 


TE 


ORG 799gH 


H=gd6H=CLR 
CHLL PRNT 


DE=DHTH2 

CHLL MSG 
DE=DHTHS 

CHLL GETL 
DE=DHTHS+gEH 
H=XDE> 

昌 =H- さ 9H 

IF CV=1 GOTO LF@1 


IF CV=g GOTO LPg1 
日 = ボク 

日 =H キ 2 

H=H 

L=g1H 

〈DHTH1)=HL 


=g6H=CLR 
CHLL PRNT 


日 = 計 " - ト ESH) 

り -RHNM て CHDR> 
りー-RHIN て キャ う 2 タ 5 ぅ 
り -RHIM て (49) 

すす 9 - ト (ESH)= 昌 H 


B=ggH: じ =9gH 
DE=g928H 
HL=DgggH 

ロニ 49H=9 

て HL )= 日 9 
SMMHP HF:RF < 


H=g9gH 


) て 952H)=H 


3 BUSUBE MMHIT 


we we we wa we we we we we we wa we we we 


CRLL GETKY 


UP 

IF Z=1 GOTO PROGU 
DOMIN 

IF Z=1 GOTO PROGD 
LEFT 

IF Z=1 GOTO PROGL 


RIGHT 

IF Z=1 GOTO PROGR 
SPRHCE 

IF Z=9 GOTO LP9g2 
H=H6H 


て 9952H)= 昌 
GOT0 9999H 


CSP〉=HL 
HL=CDRTR1 


29 796B 2B PEC HL j HL=HL-1 

21 Z96C 7C LDb HzH ) 日 =H 

22 796D OR. L 5 H=H OR L 

23 7g6E 29FB JR NZ LPgS 3 IF Z=@ GOTO LP93 
2 7979 E1 POP 3 HL=〈SP> 

25 7g71 C9 RET 3 RETURN 

26 7972 

2 アー 79Z2 5 

28 7972 PROGUI ENT 

29 7@72 HF OR 日 3 曲 =9gH 

39 79Z さ B9 CF に 要 マ 

さ 1 7974 28CF JR ご ど 。LF92 ) IF ど ご =1 GOTO LP92 
32 7g76 9D DEC ヒ 3 じ =Cー1 

ささ 77 アア 2 LD (HL):D 5 て HL)=D 

3 7gZ8 RF OR 日 3 C リ = ロ 9 

35 79Z9 ED52 SBC HL:DE 3 HL=HL-DE-CV=HL-DE 
さら 6 97B 98 ER HF: HF < 3 SMHP HF:RF< 

3 さ 7 79ZC アア LD HL ) 日 3 て HL)=H 

38 797D 9g8 EX RF:HF7 3 SMHP HF:RHF< 

さ 9 797E 18C5 JR LPGg2 3 GUTO LP@2 


=18H 
IF 2=1 GOTO LPG92 
1 


aa 


* ポ  Z8 HSSEMBLER SP-2192 PHGE @3 


18BB GOTO LP@2 


PROGL: 
=9gH 


IF 〆=1 GOTO LP9g2 
B=B-1 


* 
ロ 
# 
ロ 
* 
ロ 
* 
昌 
日 
品 
き 
ロ 
日 
日 
昌 
* 
ロ 
* 


GUTO LP92 


H=27H 


IF ご =1 GUTO LPGg2 
E=B+1 

<HL)=D 

HL=HL+ 1 

SHP HF:HF" 


EL 


GOTO LPGg2 


ENT 
DEFUU ggggH 
ENT 
535@4545 DEFM “SPEED 〈9-9) ? < 
4429283g 
2D392929 
さ F29 
gD DEFB  gDH 
ENT 


マシ ン 語 魔神 語 9 の 


MZ-2000 
MZ-2200 


MZ-2000/2200 の BASIC (MZ-12Z001, 
MZ-2Z001) に は , 残念 な が ら , TRON/T 
ROFF の よう な トレ ー ス 機能 が あり ませ ん 。 

トレ ー ス 機能 ほし は , デバ ッ グ の た め に , 
現在 実行 中 の 行 番号 を 確認 び で きる よう に す 


る 機能 で す 。 そこで , トレ ー ス を 実現 で き 
る よう な ユー ティ リティ を 作成 し まし た 。 

この プロ グラ ム は , トレ ー ス の 方 法 を ユ 
ー ザ ー が 自由 に BASIC で 定義 どき る と いう 
特長 が あり ます 。 そ の た め 変 数 の ダン プ な 
と も 任意 に 行 な を ます 。 


単に , 実行 する BASIC プ ログ ラム の 行 番 
号 を 。 ディスプレイ の 画面 に 表示 させ た 場 
合 . オリ ジ ナ ル の 表示 画面 が 壊れ て し まい 
ます 。 変数 を ダン プ す る 場合 も 同様 で す 。 
これ で は デバ ッ グ に 支障 を きた す 恐 れ が あ 
り ま す 。 デ バッ グ す る 人 が デバ ッ グ 情報 を 
自由 に 収集 し て 好き な 場所 に 表示 で きれ ば 
ずい ぶん 便利 で す 。 そこで デバ ッ グ 用 の ル 
ー チ ン を BASIC で 作成 で き る よう に し まし 
た 。 こ の ツー ル を デバ ッ グ の 対象 と な る B 
ASIC プ ログ ラム ( 被 デ バッ グ プ ロ グラ ム ) 
か ら 呼 び 出す こと で , 1 ライ ン 実 行 す る ご 
と に , BASIC で 作成 し た デバ ッ グ の た め ゅ の 
ルー チン を , サブ ルー チン 形式 で 実行 きせ 
ます 。 し ただ が っ て 。 この デック ・ サ プル 
ー チ ン の な か で , 任意 に 行なう こと が で き 
きま す 。 

被 デ バッ グ プ ロ グラ ム と デバ ッ グ ・ サ ブ 
ルー チン と の 関係 は 第 1 図 の よう に な っ て 
いま す 。 


テー プ 用 の BASIC (MZ-1Z001) は 第 2 
図 ,DISK BASIC (MZ-2Z001) は 第 3 
を 参照 し て 。 モニ タ の M ユ マン ド て で 入力 し 
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デバ ッ グ の 開始 (TRON に 相当 ) 
デバ ッ グ ・ サ ブル ー チ ン の 呼出 し 


I0 USR($FA00) : GOSUB 500 


ーー ニー= こ ニニ < ベー ニー ニー ニー ニー ニーー ニ ーー ニー ニニ ーー ニー ニー ニー ニー ニニ ニニ ーーーー 


500 PRINT LO,A 
(デパ バッグ ・ サ ブル ー チ ン ) 


5I0 RETURN 


I50 USR($FA02) 


ニー- ニ ーー ニー ニー ャ ーー ニニ ーー ニー ニニ ニニ ニー ここ ニニ ニー ニニ ニー ニー 


1 
ニー ニニ ニー ニー ニー ニー よー ニー ニニ ニー ニー ニニ ーー ニニ ニー ニニ ニニ ニー ニニ ーー 


300 END 


デバ ッ グ 終了 (TROFF に 相当 ) 


デバ ッ グ ・ ツ ー ル 


(マシ ン 語 部 分 ) 


実行 順序 
10 


s500>510 一 20…500 っ 510 一 30 一 500--510ー…… 


TAPE BASIC MZ-1Z001 用 


** ロ h!MZ Check sum Bu=tem V1.1 *% ポ 

ADR。 +O +1 +2 + さ +4 + ロ +6 + プ ssum。 
FAOO 18 O2 18 68 21 9F FA * さ 。21 
FQAOgB 5 FA 21 9 Fa CD * 品 。 プ BE 
FA1O C9 22 C さ Fa 21 9 FA *# 呈 。 つ 谷 


て 《 だ さい 。 ど ちら も 必ず , FA00 番 地 か 
ら 入力 し て くだ さい 。 正しく 入力 し た な ら 6 
S コ マン ド で スタ ー ト アド レス FA00 番 地 , 
エン ドア ドレ ス FAFF 番 地 と し て テー プ " に 
セー ジグ し まま ず 。 の と き ジ ャ ンプ アド レス 
は 省略 し て 、 すぐ に |CR| し て くだ きい 。 


(1) デバ ッ グ の 開始 は , 被 デ バッ グ プ ロ 
グラ ム の な か で USR ($FA00) で 
デバ ッ グ ツー ル を 呼び だ し , 実行 し 
ます 。 そ うす る と , 最初 に 現われ た 
GOSUB 文 が デバッグ ・ サ ブルー 
チン と し て 1 ライ ン ご と に 毎回 実行 
る れ ま す 。 
(2) デバ ッ グ ・ サ プル ー チ ン の 呼び 出し 
を 途中 で 終了 る せ た い と き に は 被 デ 
バッ グ ・ プ ログ ラム の な か で USR 
($FA02) を 実行 し て くだ きい 。 以 
後 。 デバ ッ グ ・ サ ブル ー チ ン の 呼び 
だ し を 中 止 し ます 。 
(3) 被 デ ダッ グ ・ プ ログ ラム が すでに ロ 
ー ド る され て いる と し て , 使用 方 法 の 
例 を 説明 し ます 。 
① LIMIT $F9FF 
②④ LOAD `DEBUG-TOOL/[CR| 
⑧⑬③ デバ ッ グ ・ サ プ ブルー チン を 作成 
し て , 家 デ バッ グ ・ プ ログ ラム 
に 付け 加え る 。 

④ 被 デ バッ グ ・ プ ログ ラム の 先頭 
また は 途中 の デバ ッ グ の 開始 点 
に , USR($FA00) 文 と GOS 
UB 文 を 追加 する (USR($FA 
02) は 一 般 に 不要 ) 

⑤ RUN 


デバ ッ ク ・ サ プ ブルー チン の な か で , デバ 
ッ グ 情報 を 収集 する た め に , 次 の 3 つの 変 
数 が 利用 で きる よう に な っ て いま す 。 


これ か ら 実 行 する 行 番号 
サ プ ル ー チ ン の ネス ティ ング 数 


FOR 文 の ネス ティ ング 数 


た と ぇ ば ,GOSUB 文 を 重ね て 16 回 実行 す 
る と エラ ー に な り ま す が , 変 数 GQ を 調べ る 
こと で , エラ ー 原 因 を 究明 で きま す 。 こ れ 
ら の 変数 LQ, GQ, FQ は 参照 だ けが 可能 で , 
値 の 代 文 は 無視 きれ ます 。 


DISK BASIC MZ-2Z001 


** Dh!MZ Check =um Sg= も tm 
+O 
18 


USK て FRBg ロ > 3 ロロ SUB 1 ウ 9g 

FOR =19 TO 12 

PRINT TRB く 1g>8" エニ " ョ エ 
FRINT TRBC1928" [ホフ = 5 1 キラ 


USK て FR スッ 

PRINT TRBC192" エキ さ =" 5 エ ホ さ 
PKINT TRBC1g25" エボ 生 =" エボ 時 
END 

1ggg PRINT" EL" STR ま く LR25" 7 
11gGB RETURN 


SSSS8 る @Sg 


ー デ バッ グ ・ ツ ー ル の 呼び 出し 


NEXT 被 デ バッ グ ・ プ ログ ラム 
(60 は 呼出 し 解除 ) 


デバ ッ グ ・ サ ブル ー チ テン 
( 行 番号 LOQ を 表示 ) 


BASIC デ バッ グ ツ ー ル 707 


j5 0 ek) 


、 う ロ g %G=CSRH 
319 CURSOR 9』24 


- き 2@g PRINT" La" 』LOB" La FQe' FNBP 


Ne 、 359 CURSOR sgzYo 
、 349 RETURN 


_ デバ ッ グ サ プ ル ー チ ン 例 (2) 


19 USRC ま FRg21 1 じ =1: は SUB さ gg 


:  ( 寝 デ バッ グ ・ ブ プロ グラム) 


さる gg IF IC>19 THEN 1 じ =1』 ロ OTO さ 5g 


ルッ レス 
さ 39 PRINT" LM=' に" ロロ RT 


349 FOR =g TO 299#NEXT 
359 RETURN 


1) 第 4 図 は , 行 番号 20 か ら 行 番号 60 ま 
で トレ ー ス する 例 を 示し て いま す 。 
これ を みれ ば だ いた いわ か る と 思い 
ます 。 

(2) 第 5 図 は デバ ッ グ ・ サ プ ブルー チン の 
例 で , カー ソル 位置 を XQ、YQC 退 
避 し , カー ソル 位置 (0 , 24) に 行 番 
号 LQ と, GOSUB 文 の ネス ティ ング 
数 FQ と を 表示 し , カ ー ソ ル 位 置 を も 
と に 戻し て いま す 。 こ の よう に すれ 
ば トレ ー ス し て も , も と の 画面 を 全 
体 的 に 壊し て し まう こと が あり ませ 
ん 。 

(3) 第 6 図 は , 10 行 お き に 行 番号 な ど を 
表示 する デバ ッ グ ・ サ プ ブルー チン の 
例 で す 。 他 に も 同じ よう に し て , た 
と えば 変数 の 値 が 変化 し た と き に , 
その 変数 の 値 と 行 番号 を 表示 する こ 
と が で きま す 。 


BASIC デ バッ グ ツ ー ル アセ ンプ ルリ スト 


18g2 
1868 


る 19FFR 
CDB5FR 


… デ バッ グ ロ 


ツー ル の 呼出 し 


デバ パッ グ し 
サ プ ル ー テ チン 


Fe'sFG3" "li 


デバ ッ グ 以外 に も この ツー ル の 使い 
みち は いろ いろ ある と 思い ます 。 工 
夫 し だ いで お も し ろ い 使い 方 が で き 
る の で は な いで し ょ うか 。 

この ツー ル は 大 部 分 が BASIC イン 
タプ リタ を パッ チ す る プロ グラ ム で 
で き て いま す が , 実行 終了 後 は , 自動 
的 に パッ チ 部 分 が も と に 戻る よう に 
な っ て いま す 。 

デバ ッ グ する プロ グラ ム の な か で , 

V-RAM に アク セス する 命令 を 使っ 
て いる 場合 。 デ バッグ ・ サ プルー チ 
ン の な か で PRINT 文 を 発行 する と , 
通常 の RAM に 自動 的 に 切り 換わり 
ます 。 そ の 部 分 どけ PRINT 文 を 避け 
る 工夫 を し て くだ さき るい 。 

この ツー ル は , MZ-2000 (/2200) 

用 に 作成 し ま し た 。BASIC の バー ジ 
ョ ン は , MZ-1Z001。 MZ-2Z002 の 


ELLE EEEEESHSEEEH 
3 BRSIC DEBUG TOOL 
E』 V1. ロ BY こう ゅ アン 1 1 
涼 池 素 池 池 束 玉 叶 宮 玉 玉串 玉 吊 
5 

RG FRggH 
RETURN*EQU_ 1FDH 
NEXTL EQU 1C2BH 


H 
USR1I JER ST1 
USR23 JR REV 


H 
ST1* LD 


HL PREN 


両方 と も V1.0C で す が , 他 の バー ジ 


ョ ン で も だ いじ ょ うぶ だ と 思い ます 。 " 


MZ-80B プ B2 に つい て は 第 7 図 の ア 
セン ブル リス ト を 参考 し に て 改良 し 
て みて くだ さい 。 

(5) FAC 7 番地 か ら FAF 7 番地 まで は , 
LQEGQEFQ の 値 を セッ ト す る B 
ASIC 代 入 文 (POKE 使 用 ) に な っ 
て いま す 。 他 の ステ ー ト メン ト を 追 
加 し た い 人 は , この 部 分 を 変更 し て 
《 だ さい 。 


8 月 号 の 「BASIC ス ピー ドア ッ プ ツー ル 
で す が , 東京 ・ 世 田谷 の 佐藤 勝彦 さん に , 
DEF KEY 文 で 参照 され た 行 (た と ぇ ば , 
DEFKEY(4)= ニ GOTO1000[CR | の ょ き の 行 
番号 1000) が な く な る と いう こと を 知ら せ 
て いた だ きま し た 。 し か た が な い の で , B 
ASIC テ キス ト に , 

ON 0 GOTO 1i, 15, 1 … 


切り た い 行 番号 

を つけ た だ し て 使用 し て いる そう で す 。 
実は , この ツー ル を 作成 する とき, DEF 

KEY 文 の こと を すっ か り 忘 れ て いた の で す 。 

ご めん な さい 。 同じ よう な 間 題 が あっ た な 

ら , BASIC の テキ スト の 最後 に 。 上 の ょ よう 

な 文 を 追加 し て 使用 し て くだ さい 。 


3 KFD> 21 に 8H 
CFD〉> 1DBBH 
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CRLL PSUB 


FRGR 
FRgDb 
FR1g 


FR1 1 
F 折 14 
FR1 
FR1R 
FR1D 
FRZGg 


FR23 
FRH2G 
FR2Z ァ 
FR2 は 
FR2Z9 


FRZC : 


FRZD 
FRZE 
FR31 
FRR3 和 4 
FR3 ァ 
FRSR 
FR3D 


Fn4g 
FR4 さ 
FR46 
FR49 
FR4C 
FR4F 


FR52 
Fn55 
FRSB 
FR5B 
FRSE 
FR6 1 
FR64 


FRG 
FRGB 
FRGS9 
FRG 
FRP6B 
FR6C 
FRGF 
FRr2 
FR ロア 5 
FR ロア B 
FFP 表 
FR7E 
FRB1 
Fn8 


FRBS 
FRS6 
FRS ァ 
に に 】 
FRS9 
F RS 
FRB に 
FRSD 
FRBE 
FRSF 
FR9Qg 
FR92 
FR9 さ 
FR94 


FRS5 
FR 
FRSR 
FR3C 
FRSF 
FRR1 
FRR4 
FRR6 
FRR9 
FRR お 


<19S5FR 
CD8B5cR 
に 9 


22 ビ さ F ロ 
19RFR 
CDGBSFR 
21 ロ 9FR 
に じ り ら 5 だ 品 
に じ 3Dr 1F 


22C5FR 


21 に ヒア ドロ 
CDESF ロ 
じ さ 2 お 1 


る 1B さ FR 
CDBSFR 
21B9FR 
CDSSFR 
2 ロ に SFR 
C3281 ビ 


1 BEFR 
CD ら 5 と FR 
21 ロ 9FR 
CD8SFR 
2RCSFR 
CDBSFR 
に 32B1 に 


E1 
と 
2B 
2 
E5 
21 ロ 4FR 
CDSSFR 
19RFR 
CDSSFR 
1H う FR 
じ D ら 5F 正 
21PEF 
CDSSFR 
ビ 9 


281 じ 
に さ 23FR 


ロ S* 


LR1 5 


REVI 


PSUB1* 


宮中 
PGSN* 


PGS ロ N 
PREVNI 
FREVD* 
PLN1 5 


PRTCH TBLE ボ 池 涼 涼 


HL FGSH 
FSUE 


て LSRV は > 5 HL し 
HL 4 PS ロ 
FSLUB 

HLs FLN1 
PSMB 
RETURN 


KLSRVL > 』 HL 
HL 

| 

に F&3。| 9 

て FRFEH>5 折 
HL 

Rs HL > 
(FRFFH) 』 
HL』FLN2 
PSUB 

HL LTRHE 
PLN ロ + る 
NEKT し + さ 


HL FLHD 
FSUB 

HL PRTRN 
FSUB 

HL て LSRVG> 
NEXTL 


HL』 PRKT ロ 
PSUB 

HL』 PLN1 
PSUB 

HL て LSRVL > 
FLN ロ +2 
NEXTL+3 


HL 

HL 

HL 

HL 

HL 

HL』 PRE'W ロ 
FSUB 

HL PGSO 
FSUE 

HL PLHO 
FSUJB 
HL ヵ PRTO 
FSUg 


1FD4H 

GS 

1FD4H 

1CZ1H 

12F6H 

REVg 

12FSH 
EDH, 了 BH, gH 
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スン < ペース  、 10 場 面 を 起す シミ ュ レ ーション 宇 定 ゲー ム 。 数 々 の 
SPACE - ス トリ ッ プ 2020 * 困難 に 打ち 和 愛 っ て 第 10 番 束 表 まで 玉虫 に 行く こと が 
で きる か ? 大 デ ロ グ ラム で 。 3 琴 に 分 か れ て ロー 


ド さ れる 。 メー1 の 先進 グラ フィ ッ ク に 脱 貴 ! 


の 
スペ ー ス ハバ パトロール 和 生 言っ 7 つの 竹本 て 同時 に 戦い が 発生 ! 適格 な 
SPACE PATROL 麟 断 で ワー プ し な が ら 敵 を 名 え 撃 た な く て は な ら ぬ 。 
地球 を 守り 通す こと が 人 往 務 だ 。 や りり はじめ る と や あめ 
られ な い お も し ろ さ の スリ リン グ な ゲー ム で す 。 
⑨ 〇 み カ ラー パッ ケー ジ 入 り で 価格 は すべ て 3000 円 。 シ ョ ッ プ ある い は 現金 書留 で どう ぞ (送料 サー ビス 
着 後 4 日 以内 に 発送 ) 
ント リッ 0000 プ ァ イサ アー ザ ャ Pa ナリ 
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人 入門 MZ LO0G0 と リス ト 処理 


コン ピュ ユー タ と 人 工 知能 


に の も と 補 す びら こ 


@ 9 記号 処理 言語 と し て の LOGO ) 


コン ピュ ー タ と は 計算 機 ほ いう 意味 で す が 、 その 名 の と お り コ 
ンピュータ は , 数 値 計算 を 得意 し し て いま す 。 しかし, 現在 の コ 
ンピュータ の 応用 分 野 で は 数 値 計算 以外 の 非 数 値 計算 が 要求 され 
る こと が 大 部 分 で す 。 すなわち, デー タ の 管理 , 表 の 処理 , グラ 
フ の 処理 な ど な ど で す 。 そし て , 非 数 値 計算 の 中 で も 記号 処理 と 
いう 分 野 は ,、 コン ピュ ー タ を 知能 的 に する た め に 不可 欠 な も の と 
な っ て いま す 。 


記号 処理 に 使わ れる コン ピュ ー タ 言語 と し て は Lisp や Prolog が 


有名 で す 。 し か し , MZ LOGO も 簡単 な 記号 処理 な ら Lisp に 負け 
な いく らい の 力 を 持っ て いる の で す 。 そし て , これが, LOGO = 


ター トル ・ グ ラフ ィ ッ ク , と まで 言わ れ て いる LOGO か ら ター トル ・ グ 


ラフ ィ ッ ク を 取り 除い た 姿 な の で す 。 これから 先 , この LOGO の 
カカ が どの 程度 まで Lisp に 太刀 打ち で きる も の か 見 て いき た いと 思 
ます 。 

と ころ で 記号 処理 た 言う と き の 記 号 と は いっ た い 何 の こ と で し 
ょ うか 。 それ は , 記号 表現 の こと な の で す 。 記 号 表現 と は Lisp の 
用 語 で . アト ム と リス ト の 総称 で す 。 つ まり , 扱う こと の で きる 


デー タ の 総称 な の で す 。LOGO で は , それ に 対応 する も の と し て , 
数 。 ワー ド , リス ト と いう デー タ が あり ます 。 大 ぎっ ぱに 言え 
ば , 数 や ワー ド が アト ム で リス ト は 同じ も の だ と 言う こと も で き 
る で し ょ う 。 を そして, これ ら の デー タ を 用 いて いろ いろ な 処理 を 
する わけ で す が , 扱う デー タ は 大 部 分 が リス ト で ある こと か ら , 
記号 処理 は リス ト 処 理 と 呼ば れる こと も あり ます 。 リ スト を 扱う 
こと が 多い の は , それ が 動 的 で 柔軟 な デー タ 構 造 を 持っ て いる た 
めで 複雑 な 情報 を 表わす の に 適し て いる か ら だ と 考え られ ます 。 
それ で 以下 で も , リス ト を 扱う 処理 を 中 心 に し て 話 を 進め て いき 
だ た いと 思い ます 。 


4 LOGO が 扱え る デー タ “ 


本 題 に 入る 前 に , LOGO が 扱え る デー タ に つい て 簡単 に 説明 し 
て お きま し ょ う 。 それ は , 数 , ワー ド , リス ト の 3 種類 で す 。 

数 と は 数 字 や 小数 点 が 並ん ども の で す 。 

だ よん ば 。 

1/0 ジョー スラ 。56/12.。4 
と いっ だ も の で す が ,。 これ に つい て 説明 は いら な いで し ょ う ( 指 
数 表現 に つい て は 若干 説明 を 要する の で す が , ここ で は 必要 な い 
と 思わ れる の で 省き ます )。 

次 に , ワー ド で す が , これ は 単語 の こ と で す 。 この 単 話 は 。 意 
味 が あろ う が な か ろう が , 英字 や 数 字 . ある い は 特殊 記号 が ゴチ 
や に な が っ だ も の で す 。 た だ し 区切 9 記 呈し < 5 
>, 三 , ” ) を 含ん で は いけ ませ ん 。 例 を 掲げ けれ ば , 次 の よう な 
も の が あり ます 。 

happy,one,why?/abc! 

そし て 最後 に リス ト で す が , これ は , いま まで 述べ た 数 や ワー 
ド を 空白 で 区 切っ て , それ ら を カギ カッ コ [ ] で くく っ た も の 
だ する だ 沈ま 

[R2D2 C3P0 VF1J1 

[I am tired!] 

ES 和伸 人 PE 
な ど が 考え られ ます 。 リ スト の 中 の 数 や ワー ド の こと を 以下 で は 
要素 と 呼び ます が ,。 恐ろし いこ と に , この 要素 は リス ト で も よい 
の で す 。 つ まり , リス ト の 構成 要素 が リス ト な の で す 。 これが, 
いわ ゆる , 再帰 的 に 定義 きれ た デー タ 構 造 し いう も の な の で す 。 
リス ト を 要素 と する リス ト と し て 次 の 例 を 示し ます 。 

[LOh! PC][Oh! MZ][Oh! FM]LOh! 55][Oh! HC]] 
これ は 雑誌 の リス ト で す が , 雑誌 名 は この 場合 。、 1 つの ワー ド で 
表わす こと が で き な い の で リス ト で 表わし て いま す 。 そして,。 を 

入門 MZ LOGCO と リス ト 処 理 7 の ぢ 


れ ら を 集め た リス ト は 読ん で タメ に な る (? ) 雑誌 の リス ト と 言え 
で まう 。 


ke] 複雑 な 情報 を 表現 する リス ト 


種々 の 情報 は リス ト と し て 表わす こと が で きま す 。 リ スト と は , 
ある も の の 次 は 何 . その 次 は 何 、…… ,。 と いっ た 具合 に 順序 を 示 
す デ ー タ 構造 で す 。 リ スト で と どの よう に し て 情報 を 表わす か と い 
うこ と を 具体 例 を 示し な が ら 見 て いき ま ょ う 。 

英語 の 文 を 表わす の は 簡単 で す 。 た と えば , 

[I have a headache .] 
と いう 英 単語 の リス ト と し て 表 わ せ ます (日 本 語 の 文 で も 同様 で 
す が ) 
また だ た, マー ジャ ン の 手 牌 な ら , 
[[ 万 子 1 ][ 万 子 | ][ 万 子 2 ][ 万 子 3][ 万 子 3][ 篤 子 | ] 
[ 索 子 2 ][ 索 子 3 ][ 筒 子 | ][ 筒 子 2 ][ 筒 子 3 ][ 東 ][ 東 ]] 
と いっ た だ 具合 に 表わす こと が で きま す 。 しかし, 本 当 は これ で は 
不 十 分 で , 鳴い た 場合 それ を 示す 工夫 が 必要 で す 。 

この 程度 で は , まだ まだ リス ト の エラ る は わか り ま せん 。 も っ 
と 複雑 な 例 を 考え て み ま し ょ う 。 

“ 夫 が 俊彦 さん , 妻 が 聖子 さん , 子供 が 上 か ら 順 に 真彦 呑 。 明菜 
さん, 慎吾 君 し いう 家族 " を リスト で 表わす と , 

[俊彦 聖子 真彦 明菜 慎吾 ] 
と な り ま す 。 こ の リス ト で は 先頭 が 夫 . その 次 が 妻 。 そ の 次 が 子 
供 ほ いっ た 順序 が 仮定 され て いま す 。 さ て , 年 月 が 経つ と 子供 た ち 
も 独立 し て いき ます 。 真彦 膨 が 伊代 きん と 結婚 し , 秀美 , 久美 子 
と いう 子供 が 生ま れ ま し た 。 慎吾 君 は 今日 子 さ ん と 結婚 し た ば か 
り で す 。 こ の と き の , この 家族 を リス ト で 表わす と , 
[俊彦 聖子 [真彦 伊代 秀美 久美 子 ] 
明菜 [慎吾 今日 子 ]] 
と な り ま す 。 そ し て また 時 が 経て ば , 孫 た ち も ひ 人 孫 た ちち も 独立 し て 
いき ます 。 そ うす る うち に いつ し か ,, 家族 た いう リス ト 構 造 が 何 
段 に も 家族 と いう 入れ 子 を 持っ た 構造 し な っ て いき ます 。 
も う ひ と つ 複 雑 な 例 を 示し まし ょ う 。 テ ー ブ ル の 上 に いく つか の 


積木 の 世界 の 状況 
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積木 が 置か れ て いる 状況 も リス ト で 表わし て み ま す 。 い ま , 表 わ 
すべ き 状 況 が 図 1 の よう に な っ て いた と 仮定 し ます 。 こ の と き 存 
在 す る 物体 は , 直方 体 , 箱 , 四角 すい , 球 ど だ け と し ます 。 こ の と 
き , た と えば 物体 C は 次 の よう な リス ト で 表わす こと が で きま す 。 
[C 直方 体 [1 10][2 2 2] テー ブル B 赤 ] 

この 場合 、 リス ト の 先頭 が 積木 の 名 前 , その 次 が 物体 の 種類 , そ 
の 次 が 積木 の 位置 を 示す 座標 , その 次 が 積木 の サイ ズ , その 次 が 
支え られ て いる 物体 , その 次 が 支え て いる 4 物体, その 次 が 積木 の 
色 を 示し て いま す 。 そし て , この よう な リス ト を 集め て 作っ た 

[[ A 四角 すい …… ][B 直方 体 …… ][C enet ] スゴ 上 
と いう リス ト が , この 積木 の 世界 を 表わし て いる と 言え ます 。 

リス ト を 使っ て 情報 を どの よう に 表 わ せ ば よい か , 少し は わか 
っ 准 で し まう が 。 

リス ト で 表 わ せ る 情報 は この 他 に も 数 多く (ある の で す が , きり 
が な い の で この 辺 で や ゆめ に し まし ょ う 。 


史 記号 処理 用 の 基本 関数 


る て, 次 は リス ト を 扱う 関数 に つい て 解説 し て お きま し ょ う 。 
ワー ド を 扱う 関数 と し て は , word,/first,Last/butfi 
rst/but Last/ が あり ます が 。 これ ら は , ここ で は 。 省略 し ,, 
以後 , 必要 に な れ ば 説明 し た いと 思い ます 。 

《 リ スト を 分 解す る 関数 ) 

これ は , first/Last/butfirst/butLast の 4 つ 
で す 。 こ の うち 特に 大 切な の は first と butf1rst で す (は 
っ きり 言っ て , Last,butLast を 使う こと は あま りあ り ま せ 
ん )。 これ ら の 関数 は すべ て 1 つの リス ト を 引数 ほし し て と り , それ 
ぞ れ , リス ト の 最初 の 要素 、 リス ト の 最初 の 要素 を 除い た リス ト 
を 値 と し て 返し ます 。 butf1irst/butLast の but と いう の 
は ,「… 以 外 」 と いう 意味 が ある こと を 知っ て いれ ば , その こと は 
容易 に わか る で し ょ う 。f1irst は も ちろ ん ,「 最 初 」 と いう 意味 
で すね 。 理解 し や すい よう に , first/butfirst の 機能 を 表 
1 に 示し ます 。 表 1 を 見 て も わか る よう に ,。 butf1rst に よっ 
て 返さ れる 値 は 常に リス ト で ある こと を 覚え て お いて 〈 だ さい 。 
《 リ スト を 組み 立て る 関数 〉 

これ は , List/fput,/Lput/sentence の 4 つ で す 。 
それ ぞ れ は , リス ト を 作る , リス ト の 最初 に 要素 を 付け 加え る , 
リス ト の 最後 に 要素 を 付け 加え る , 引数 の 構成 要素 で リス ト を 作 
る , と いう 機能 を し ます 。 こ れ ら の 詳し い 説 明 は マニ ュ ア ル に ま 
か せる こと に し て , ここ で も , それ ぞ れ の 機能 を 表 2 に まとめ る 
こと に し ます 。 こ の 表 で は , List と sentence の 機能 の 違い 
を よく 見 て くだ きい 。 大 ざっ ぱに 言え ば , sentence は 引数 が 
リス ト の と き は , その 1 番外 側 の [ と ] を 取っ て か ら , 2 つの 引 
数 を 組み 合わ せ た リ スト を 作る の で す 。 

リス ト を 組み 立て る 関数 で 1 番 重 要 な の は fput で す 。f は f1 
FsSt の f、 put は 「 置 く 」 と いう 意味 が ある こと を 知っ て いれ ば 
機能 を 理解 する の は 人 容易 で し ょ う 。 

今 ま で に , first/butfirst,fput が 大 事 だ と 言っ て き 
まし た が , それ は , この 3 つ を 使え ば , 他 の ほとん どの リス ト を 
扱う 関数 が 定義 で どき て し まう か ら で す 。 。 最も 簡単 な 例 し し て Las 


t を 定義 し て み ま し ょ う 。 こ れ は , 引数 の リス ト に butf1rst を 


表 1 FIRST.BUTFIRST の 機能 


どん と どん 作用 させ て いき , その 値 が 空 リ スト と な る と き の first 演 算 引 数 値 
の 値 と 言う こと が で きま す 。 を そこで, Last の 定義 は , first [I Love you] 1 
to Last1 butfirst [1 Love you] [Love you] 
1f emptyp butfi ML Lis Le0W DU first :Lis] 前 et EE oe] We FI Love] 
output Last1 butfirst :Lis butfirst [[I Love] you] [you] 
end 

= first [[I Love you]] [1 Love you] 
と すれ ば よい こと が わか り ま す 。 な お 。 基本 関数 と 同じ 名 前 の 手 butfiFst [[r Love you]] [] ( 空 リ スト ) 
続き は 定義 で どき な い の で , 名 前 を Last1 に 変え て あり ます 。 
表 2 LIST.  FPUT, LPUT, SENTENCE の 比較 

2 人 数 コー 第 2 引 数 | 値 

List は "Si1ng [I sing] 

fput Mi "Ss1ng エラ ー 

Lput MM "Ss1nd エラ ー 

sentence 0 "S1ng [1 sing] 

st 0 [am happy] [1I [am happy]] 

fput 1! [am happy] [I am happy] 

Lput MM [am happy] [am happy 11] 

Sentence 1 [am happy] [I am happy] 

List [He knows] [my name] [[He knows]Lmy name]] 

fput [He knows] [my name] [LHe knows] my name] 

Lput [He knows] [my name] [my name [He knows]] 

sentence [He knows] [my name] [He knows my name] 


<) 再帰 的 関数 の 定義 


次 は , 重要 な プロ グラ ミン グ 技 法 の ひと つ で ある , どの よう に 


し て 再帰 的 な 関数 を 書い た らい い の か , 


し た いと 思い ます 。 再帰 的 な 関数 は 記号 や , 
き に は 必ず と 言っ て よい ほど 表 わ れ て きま す 。 そのため , 再帰 的 


な 関数 を 自分 で 書く こと は リス ト 処 理 へ の 第 1 歩 と 言え を 4 で し ょ う 。 


と いう こと に つい て 説明 
リス ト を 処理 する と 


それ で は , どの よう に し て 再帰 的 な 関数 を 書い た ら よ い の で し 
ょ うか 。 不幸 な こと に , すべ て の 場合 に 当て は まる 方 法 は 存在 し 


ま 志 ん 。 し か し 
示し ます 。 


いく つか の 場合 に は 非常 に 有用 な 経験 則 を 次 に 


経験 昌 1 : も っ と も 簡単 な 場合 か ら 始め よ 。 
経験 則 2 : 複雑 な 場合 を 簡単 な 場合 に 帰着 きせ よ 。 
以下 で は , この 2 つの 経験 則 を . どの よう に 適用 し て いく か に つ 
いて 説明 し た いと 思い ます 。 
(1) リス ト を 扱う 関数 の 定義 


例題 1.1 


LOGO に は , ひと つの リス ト を 引数 と し , その 要素 の 個数 を 
値 と し て 返す 関数 Couht が あり ます 。 こ れ と 同じ 機能 を 持つ 
関数 tength を 作り な さい 。 

例 

print LengthLABC] 

3 

print LengthEAEBC]] 

2 
考え 方 


まず は 経験 則 1 を 適用 し ます 。 も っ と も 簡単 な 場合 は , 引数 が 
空 リ スト の 場合 で す 。 こ の と き Length の 値 は 0 と な り ま す 。 徒 
っ て , 引数 を :L1S と する と き , プロ グラ ム 中 は , 

1f emptyp :Lis Loutput 0] 
と いう 行 が 入る こと に な り ま す 。 

次 は 経験 則 2 で す 。 :Lis が 空 リ スト で な いと き は (first 
:Lis) と (butfirst =:lis) が 存在 し ます 。 もし,(butf 
irst :Lis) の 値 が わか っ て いれ ば , 求め る 値 は , その 値 に , 
(first :Lis) の 個数 で ある 1 を 加え た も の と 言う こと が で 
き ます 。 い ま , (butfirst =:Lis) の 要素 の 個数 は Length 
で 求 ま っ て いる と すれ ば , (Length :Lis) は, 

1+(Length butfirst :Lis) 
と いう , も っ と 簡単 な 場合 に 帰着 きせ せる こと が で きま す 。. 

以上 の よう な 考え か ら , Length の プロ グラ ム は 図 2 の よう に 
な り ま す 。 
length 


to tength :lis 
1f emptyp :Lis Loutput 01] 
output 1+(Length butfirst slis) 
end 


例題 1.2 
LOGO に は , 1tem と いう 関数 が あり ます 。 こ れ は 2 つの 引 

数 を 取り , 第 1 引数 は 数 字 , 第 2 引数 は リス ト で す 。 を その 値 は 

第 2 引数 で ある リス ト の 要素 の うち 左 か ら 数 えて , 第 1 引数 の 

値 と 同じ 位置 に ある 要素 と な り ま す 。 1tem と 同じ 機能 を 特 つ 
関数 etement を 作り な さる い 。 
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例 
print element 2 [LABCD コ ] 
太 
print elLement 3 [ALBC][D E]] 
り ぢ 
考え 方 
第 1 引数 を e, 第 2 引数 を :L1S と し ます 。 も っ と もち 簡単 な 場合 
は ze が 1 の と き で す (0 と か 負 の 数 の 場合 も 考え られ ます が ここ 
で は 無視 し ます )。 こ の と き の 値 は 明らか に (f1rst iL1s) で す 
と ころ で , リス ト の n 番 日 の 要素 と は , nー1 回 butfirst 
を 作用 させ た 後 の f1rst だ し と 言う こと が で きま す 。 こ の こと を 考 
える と , se が 1 より 大 きい と き は ,。 :L1s に 1 回 Dutfirst を 
作用 きせ る ご と に :e を 1 だ け 減 らし て いき , 最後 に :e が 1 と 等 し 
く な っ た と き の f1irst を 値 と し て 返せ ば よい と わか り ま す 。 
だ か ら 、(etement ze : Lis) は , 
eLement (ze-1)(butfirst :Lis) 
と 等 し いと 言う こと と が で きま す 。 こ の EE き の デ ログ ラム は 図 3 の 
よう (に な り ます 。 


element 


to eLement ze :Lis 
1t :e=1 [output (first :Lis)] 
output elLement (ze-1)(butfirst :Lis) 
end 


例題 1.3 

LOGO に は memberp と いう 関数 が あり ます 。 こ れ は 2 つの 
引数 を 取り , 第 2 引数 は リス ト で す 。 そし て , memberp の 値 
は , 第 1 引数 が 第 2 引数 の 要素 の 中 に あれ ば tFUe.、 そう で な 
けれ ば faLse と な り ま す 。 
has を 作っ て 〈《 だ さい 。 


例 
print memberp "C[LABCD] 
776 
pF1nt memberp "Z [ABC] 
7g/se 
考え 方 


第 1 引数 , 第 2 引数 を それ ぞ れ , se, :L1s と し ます 。 stis 
が 空 リ スト の と き 値 は faLSse で す 。 もし, そう で な いと き は se 
と : し の 第 1 要素 を 比較 し ます 。 も し 等 し て な けれ ば se と iLis 
の 第 2 要素 を 比較 する , と いう 具合 に 。 se と , :L1Ss の すべ て 


の 要素 も を ,。 2 つが 等 し て な る ま て 比較 し て や れ ば よい の で す 。:e 

・ が sL1s の 第 1 要素 と 等 し て な いと き , (has se : Lis) は , 
(has :e butfirst =:Lis) 

に 等 し いと 言え を ます 。 こ の と き の プ ログ ラム は 図 4 の よう に な り 

ます 。 な お , LOGO の memberp の 第 1 引数 が ワー ド で な けれ ば 


has 

to has ze :Lis 
1f emptyp :Lis Loutput :faLse] 
1f equatp :e (first :Lis) [output :true] 
output has :e (butfirst :L1is) 

end 
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な ら な い の に 対し て , has で は 第 1 引数 は リス ト も よく な っ て い 
ます 。 それで プロ グラ ム を する と き に は , memperp ょ より has 
を 使う 方 が 便利 で す 。 
| 例題 1.4 | 
subst は 3 つの 引数 を 持つ 関数 で す 。 を し geBNR 
リス ト に な っ て いま す 。subst は , 第 3 引数 で ある リス ト の 要 
素 の 中 に 第 1 引数 と 同じ も の が あれ ば , それ を すべ て 第 2 引数 
置き 換え る と いう 機能 を 持っ て いま す 。 こ の よ ょ うな 関数 subst 
を 作っ て (て だ さい 。 
例 
print subst "a [La]Labc] 
| glc 
print subst "a 
[gz]》 > 
考え 方 
3 つの 引数 を , se1,、 se2,sL1sS と し ます 。 も っ と も 簡単 な 
場合 は ,:L1s が 空 リ スト の 場合 で す 。 こ の と き は iL1Ss が その ま 
ま 値 し な り ま す 。sLis が 空 リ スト で な いと き は , 分 まで や っ て 
きた の と 同じ よう に , butfirst で :L1S の 要素 を た どっ て い 
きま す 。 こ の と き の 要 素 を 全 度 は fput で 付け 加え を て いけ ば よい 
の で す が 、 も し 、 その 要素 が se1 と 等 し いと き に は , その 代わ り 5 
に se2 を fput す れ ば よい の で す 。 ただ だ 今 の 場合 は 。 これ を その ・ 
まま プロ グラ ム す る の は 区 し い の で (hetLp :e1 :e2 :e3)・ 
と いう 補助 関数 を 考え ます 。 こ れ は , se1 と :e3 が 等 し けれ ば , 
:e2 を , そ う で な けれ ば :e3 を 値 と し て 返す 関数 で す 。 こ の 補助 
関数 を 使う こと で (subst se1 :e2 : Lis) は , Lis が 空 
リス ト で な いと き 
fput (heLp :e1 :e2first :Lis) 
Subist se1 se2 butffrst-sLfs》 
と 書く こと が で きま す 。 そ を そして, Subst の プロ グラ ム は 図 5 の よ 
うに な る の で す 。 


Subst 


to subst :e1 ze2 :Ltis 
1f emptyp :Lis [output :Lis] 
output fput (heLp :e1 :e2 first :Lis) (sub 
st :e1 :e2 butfirst :Lis) 
end 
to help :e1 :e2 :e3 
1f equaLp :e1 :e3 [Loutput :e2] 
output :e3 
end 


"x [La]ba] 


例題 1.5 | 

detLete は 2 つの 引数 を 取る 関数 で す 。 そ し て , その 第 2 引 
数 は リス ト に な っ て いま す 。deLete は その 第 2 引数 で ある リス 
ト の 要素 の うち , FN 
と し て 返し ます 。 この よう な 関数 de tete を 作っ て 〈 だ さき 
例 


print delLete "bab c] 
6C 

print detete "a[Labac a] 
dc 


考え 方 

2 つの 引数 を , se :L1s と し ます 。 :Lis が 空 リ スト で あれ 
。 ぜ 値 は :L1s そ の も の で す 。 あと は , butfirst を 作用 る せな が 
ら リ スト の 要素 も を た どっ て いき , も し , 要素 が se と 等 し いと き は , 
を の 要素 を 除い た リス ト に 対し て deLete を 作用 きせ て や れ ば い 
い の で す 。 も し , 要素 が :e と 等 し いな いと き は その 要素 を fpu 
t で 付け 加え て お きま す 。 つ まり 

se と first :L1s が 等 し いと き 
delete :e butfirst sis 


se と first :L1S が 等 し てく な いし とき 
つっ ーfput(first :Lis)(deLete butfirst : Lis) 
で よい の で す 。 以上 の こと を プロ グラ ム に する と 図 6 の よう に な 
り ま す 。 


delete 


to delete :e :tis 
1f emptyp :Lis Loutput :Lis] 
1f equalp :e (first :Lis) Loutput delete 
se butfirst =:Lis] 
output fput (first :tLis) (delete :e butf 
第 人 きも し 5) 
end 


(2) 集合 を 扱う 関数 の 定義 

リス ト は 順序 を も っ た 集合 と 考え る こと も で きま す 。 し か し , 
要素 間 の 順序 を 考慮 し な いと き , リス ト は 集合 と 同じ で ある と み 
な すこ と が で きま す 。 た だ し , 集合 し みな すか ら に は , ひと つの 
リス ト の 中 に 2 つ 以 上 同じ 要素 を 含ん で いて は いけ ませ ん 。 以 下 
で は , リス ト を 集合 と し て 扱う とき, それ ら を 処理 する 関数 を 定 
義 し て み ま し ょ う 。 
| 例題 2.1 | 

2 つの 集合 が 与え られ た と き , その 和 集 合 を 値 と し て 返す 関 
数 Un1on を 作り な さる い 。( 図 7 参照 ) 


集合 の 和 , 積 , 差 


考え 方 

引数 を , : Set1、 set2 と し ます 。 un1ion の 値 は :set2 
の すべ て の 要素 を 持つ こと に 注意 し て , : set1 の 要素 を ひと つ ず 
つ sset2 に 属す る か どう か 調べ る こと に よっ て 関数 を 作る こと 
が で きま す 。 ・ Set1 の 要素 が :set2 に 属す る か どう か は memb 
eFp を 使っ て 調べ る こと が で きま す 。 

まず , : set1 が 空 集合 ( 空 り スト ) なら ば , un1on は =: set2 
その も の で す 。 

: Set1 の 要素 が ひと つの と き , それ を e1 と し ます 。 こ の と とき. 
e1 が :set2 に 属 せ ば un1on は : Set2,。 そう で な けれ ば , un 
1on は (fput"e1 :set2) に な り ま す 。 

次 に , set1 が Le1 e2 e3] と いう 場合 は ぼう すれ ば よい で し 
ょ うか 。 こ の と き は , Le1] と set2 の un1ion を 求め , その 結 
果 と Le2 ] と の un1ion を 求め 、 そ し て さら に , その 結果 と Le3] の 


un1on を 求め れ ば よい の で す 。 こ うい う 方 針 で 作っ た プロ グラ 
ム が 図 8 で す 。 

も し , Le1 e2 e3] と :set2 の union を 求め る と き , [Le2 
e3] と set2 の un1on を 求め た 結果 と, Le1] の union を 求 
め る と 考え ぇ た 場合 、 プ ログ ラム は 図 8 と は 少し 違っ た も の に な り 
ます 。 それ が 図 9 の ゲ プログ ラム で す 。 

と ころ で , 図 8, 図 9 の union の プロ グラ ム は 効率 の いい も の 
と は 言え を ませ ん 。 な ぜ な ら , 途中 で 等 し いか どう か を 調べ て いる 
: set 2 の 要素 の 中 に は , それ まで に sset1 か ら 移 きれ て きた も 
の も 入っ て いる か ら で す 。 こ の よう な 比較 の 無駄 を 省く た め に , 
図 10 の よう な プロ グラ ム を 書く こと も で きま す 。 図 10 の 中 の hunio 
n と いう 手続 き は , 始め 与え られ た : Set2 を 記憶 し て お き , それ と 
: Set1 の 要素 を 比べ な が ら , sparaun1onC 部 分 和 集 合 を 作 
っ て いく 働き を し ます 。 


配 放 旭 union( そ の 1 ) 


to union :set1 :set2 
1f emptyp :Set1 [Loutput :set2] 
1f has (first :set1) :set2 Loutput unio 
n butfirst :set1 :set2] output un1o 
n butfirst :set1(fput first 
: set1 :set2) 
end 


図 9 union( そ の 2 ) 


to union :set1 :set2 
1f emptyp :set1 Loutput :set2] 
1f has first :set1 :set2 
[output union butfirst :set1 :set2] 
output fput (first :set1) 
(union butfirst :set1 :set2) 
end 


union( そ の 3) 


to union :set1 :set2 

output hunion :Set1 :set2 :set2 
end 6 

to hunion :set1 :paraunion :Set2 
1f emptyp :set1 Loutput :paraunion] 
1f has first :set1 :set2 Loutput hunion 
(butfirst :set1) :paraunion :set2] 
output hunion (butfirst :set1) (fput 
(first szset1) :paraun1on) :set2 

end 


| 例題 2.2 | 
2 つの 集合 が 与え られ た と き , その 積 集合 を 値 と し て 返す 関 

数 Tntersection を 作り な さい ( 図 7 参照 ) 
考え 方 

引数 を ,、:Sset1, :Sset2 と し ます 。 sset1 が 空 集合 ( 空 リ ス 
ト ) な ら ば , intersection は 空 集合 で す 。 

: set1 が Le1] の と き , e1 が :set2 に 属し て いれ ば inte 
rsection は Le1],。 そう で な けれ ば 空 集合 で す 。 

: Set1 の 要素 が 2 個 以 上 な ら , butfirst を 作用 きせ な が ら 
: Set1 の 要素 を た どっ て いき , ssSet1 の 要素 で あっ て =:set2 
に も 属し て いる も の を 集め て いけ ば よい の で す 。 こ の 定義 は 図 9 
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で 示し た union (その 2) の 定義 と 似 て いま す 。1ntersection 


の プロ グラ ム は 図 11 の よう に な り ま す 。 


加 内 較 inter section 


to jntersection :Set1 :set2 
1f emptyp :set1 [output [上]] 
1f not has (first :set1) :set2 


[output jntersection (butfirst :set1) :set2] 
output fput (first :set1) (intersect1on 
(butfirst :set1) :setZ2) 
end 
| 例題 2.3 | 


2 つの 集合 が 与え たら れ た と き 
数 setd1ff を 作り な さい 。 


その 差 集合 を 値 と し て 返す 関 
な お 。 差 集合 と は 片方 の 集合 に 属 


し て いる が , も う 片 方 の 集合 の 要素 で は な いよ うな 要素 の 集 0 
と し ます ( 図 7 参照 )。 

考え 方 
2 つの 引数 を , :Set1 に ssSet2 と し ます 。 こ の し とき , sset1 


に 属し : set2 に 属さ な い 要 素 の 集合 を 求め る こと に し ます 。 

: Set1 が 空 集合 ( 空 リ スト ) な ら setd1ff の 値 は 空 集合 で す 

: set1 が [Le1] の と き e1 が :set2 に 属す れ ば , setdiff 
の 値 は 空 集合 、 を そう で な けれ ば Le1] と な り ま す 。 

: Set1 の 要素 が 複数 個 あ る と き は , butfirst を 作用 させ な 
が ら ssSet1 の 要素 を た どっ て いき , :Set2 に 属 き な いも の を 集 
め れ ば よい の で す 。 これ は jntersection の 全く 逆 と 言う 
ご と の で きま す 。 


か を 調べ る 関数 Subset を 作り な さい 。 
考え 方 

2 つの 引数 を , : Set1, : set2 と し ます 。 こ の と き sset1 
の すべ て の 要素 が : set2 に 属す れ ば tFue, そう で な けれ ば faLs 
e を 値 と し て 返す よう な 関数 を 作れ ば よい の で す 。 こ れ は , 1nt 
ersection や setd1iff を 作っ た と き の よ うに : set1 の 要素 
を た どっ て いっ て も 作る こと が で きま す が subset は setdif† 
の 値 が 空 集 合 な ら true, そう で な けれ ば faLse で ある に と 言 うこ 
と が で きま す 。 し た が っ て ,。 Subset の プロ グラ ム は 図 13 の よう 


な り ひま あま 
subst 
to subset :set1 :set2 
1f emptyp (setdiff :set1 :set2) Loutput 
output :fatse :true] 
end 
| 例題 2.5 | 
ひと つの 集合 が 与え られ た と き , その すべ て の 部 分 集合 を 
RUSH し て 返す 関数 powerset を 作り な る い ぃ 
例 
print powerset LABC] 
[4gC][ 4g][4C][gC][4][g][C][ ] 
考え 方 
引数 を :Set と し ます 。 : set が 空 集合 ( 空 リ スト ) の と き po 


werSet の 値 は L[]] と な り ま す 。 
:set が [Le1 e2…eN] の と き は , Power 


し た が っ て , setd1ff の プロ グラ ム は 図 12 の よう に な り ま す 。 
コ set[Le2 e3…eN] と , それ の すべ て の 妥 素 に 
加計 個 setdiff 6 
1 が 3 e1 を fput で 付け 加え た ちの の 和 和 集合 
to setdi :Set1 ・set 
5 値 上 な ェ > = 
を yp sSp ot 1 が 値 と し な り ま す 。 こ の た め , powerSet の 要素 の 個数 は , :Set 
1f has (first :set1) :set2 Loutput setdiff の 要素 が ひと つ 増 える と 2 倍 に な る こと が わか り ま す 。 いま 必要 な 
(butfirst :set1) :set2] 関数 は 、 [上 […][…]…] と いう 形 を し た リス ト が 引数 と し て 与え 
output fput (first :set1) (setd1if 和 f PE 
了 か at saet19 kst2 う られ だ た とき, その 構成 肢 束 の す て に, 特定 の 要素 6 も fput す る よ 
| end うち 機能 を 持っ た も の で す 。 こ の と き の 値 は [Le…]Le…]…] 
と な り ま す 。 こ の 機能 を 持っ た 関数 を psh と 名 付け る こと に し ま 
| 例題 2.4 す 。 ま た , psSh の 引数 を se と : し LE し ます 。:e は fput さ れる 
2 つの 集合 が 与え られ た と き 、 片方 が 他方 の 部 分 集合 か どう き 要素 、 :・ し は 与え られ る リス ト で す 。 
回 衣 罰 powerset 
to powerset - Set 
1f ( count :set)=1 [output (List :set [])] 
output union1 powerset butfirst:set) (psh (first:set)(powerset butfirst:set) 
end 
to psh se :L 
1f (count :LU)=1 [output List (fput :e first :L)] 
output fput (fput :e first : し ) (psh :e butfirst :U) 
end 
to union1 :set1 :set2 
output hunion1 :set1 :set2 :set2 
end 
to.hunion1 :s1 :p :s2 
1f (count :s1)=0 Loutput =:p] 
if has (first :s1) :s2 [output hunion1 (butfirst :s1) :p :sZ] 
output. hunion1 (butfirst :s1) (fput (first :set1) :p) :s2 


end 
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も し , : し が 空 リ スト な ら , :e を fput す べき 要素 が な い の で , 
psh の 値 は 空 リ スト と な り ま す 。 もし, : し が 空 リ スト で な いと き 
は 1ntersection や setd1ff の と き の よ うに , 

fput(fput:efirst:e)(psh:e butfirst: し ) 
と すれ ば よい こと は すぐ で わかり ます 。 

し か し , ここ で 困っ た こと が あり ます 。 MZ LOGO で は , emptyp 
の 引数 に [上 []] を も っ て きた と きも , 値 は tue と な っ て し まい ま 
す 。 を こ で , リス ト が 空 リ スト か どう か を 調べ る た め に count を 
用 いる こと に し ます 。 空 リス ト に 対し て は , Count の 値 は 0 に な 5 
ます 。 [上 [] コ に 対し て は 1 と な り ま す 。 ま だ , この と き , 和 集 合 を 
求め る 手続 き を 少し 変更 し て や る 必要 が で て きま す 。 

以上 の よう な こと を 考慮 に 入れ て 書い た プロ グラ ム が 図 14 で す 。 
| 例題 2.6 | 

ある リス ト が 与え られ だ た とき, その リス ト 中 の 異な っ た 要素 
か ら な る 集合 を 値 と し て 返す 関数 makeSset を 作り な さる い 。 
例 
pr1nt makeset[Labcbda] 
g の cd 
考え 方 

引数 を :L1s と し ます 。 も し , : し is の 要素 の 個数 が 0 か 1 な ら , 
値 は <・Lis そ の も の で す 。: Lis が Le1 e2 e3…eN] と いう 形 
を し て いる と き ,makeset :Lis の 値 は 、e1 が [Le2 e3…eN] 
に 属し て いれ ば makeset[e2…eN], そう で な けれ ば (fput 
"e1 makeset[e2…eN]) と な り ま す 。 し た が っ て プロ グラ 
ム は 図 15 の よう に な り ま す 。 

ここ まで くれ ば , か な り 楽 に , 再帰 的 な 関数 が 書け る よう に な 
うだ の で は な いで し ょ うか が 。 


四国 makeset 


to makeset :lis 
1f(count :Lis)< く 2 [output :Ljis] 
if has (first :tis) (butfirst :Lis)[output 
mekeset (butfirst :Lis)] 
output fput (first :Ljs) makeset (butfirst 
人 -】 

end 


る 】 初歩 的 バターン ・ マ ッ ツチ ング 


基本 的 な パタ ー ン ・ マ ッ チ ング の 目的 は 類似 し て いる 2 つの 記 
号 表 現 を 比較 し て , その 一 方 が ,. 他方 の 例 で ある と 言え る ほ と 似 
て いる か どう か を 決定 する こと に あり ます 。 そし て , これ は 人 間 
が や る よう な 知 的 な 情報 処理 を する た め に は 不可 欠 な も の な の で 
す 。 こ の よう な 処理 を LOGO で や る の も 不可 能 で は な いで し ょ う 
が 、 こ こ で は , も っ と も 初歩 的 な パタ ー ン ・ マ ッ チ ング を 実現 し て 
みる こと に し ます 。 そ れ は , パ ター ン の リス ト と 言明 リス ト の 比較 
UE も で きす 。 

言明 の リス ト と は 事実 を 表現 する た め に 用 いら れ ま す 。 簡単 の 
た め , パタ ー ン も 言明 も , その リス ト の 要素 は ワー ド だ け と 仮定 


し ます 。 し か し , パタ ー ン の リス ト に は 言明 の リス ト に は な い @ 
や ?2 の よう な 特別 な が ワー ド が 入っ て いて も よい こと に し ます 。 
[This is a pen] 
[Itneverrains but 1t pours] 
と いっ た も の が 言明 の リス ト の 例 で す 。 そして, 
[This is pen] 
ET 7 Ep 
[He is rich] 
な ど が パタ ー ン の リス ト の 例 で す 。 
ここ で の 目的 は , パタ ー ン と 言明 と を 比較 する 関数 match を 作 
る こと で す 。 を そこで, まず, match の 性 質 に つい て 説明 する こと 
に も ます ず 。 

1": 特別 な ワー ド を 合 ま な い パ ター ン と 言明 の 比較 で は , 両者 
が 等 し いと き , match が tTue と な り ま す 。 すなわち , 
matchLabc]Labc] 

は trUue, 
matchLabc][Ladc] 
は fats で す 。 
2 : 特別 な ワード は どの ワー ド に も マッ チ す る も の と し ます 。 


RT 


四 思 久 instant (参考 ) 


to jnstant to command 


coOmmand make :com readchar 
instant 3f equatp :com"f run/rec [fd 101 
end 1† equalp :com "Fr run.rec [rt301 


if _ equalp :com "し run.rec [Lt30] 
ji† equaLlp :com "c Fun.rec [clLean] 


end 
tO Fun。reC sact 
Fun :act 
make "picture (Lput :act :p1ctUure) 
end 
図 17 :picture を 再現 する プロ グラ ム (参考 ) 


to redraw :piclis 
1f emptyp :picLis [stop] 
Fun first :picl1is 
redraw butfirst :picLis 
end 


図 18 while コマ ンド (参考 ) 


to while :condition =:instruction 
1f not run :condition [stop] 
Fun :inSstructjion 
whiLe :condition :instruction 


回 央 購 )mapcar コ マン ド (参考 ) 


to mapcar :funct :tis 

1 和 †f emptyp :Lis Loutput :Lis] 

Output fput (run sentence :funct(first:Lis)) 

(mapcar :funct (butfirst :Lis)) | 
end | 
1 
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すなわち , 
matchLab@][abc] 
matchLabg][a bd] 
は 両方 と も true と な り ま す 。 
3 : 同様 に ? は 複数 個 の ワー ド と マッ チ す る も の と し ます 。 
すなわち 
match[? is ?][It is kind of you] 
は true に な り ま す 。 
以上 の 条件 を 満た よ す よう に match と いう 関数 を 作れ ば . 図 20 の よ 
うに な り ま す 。 こ の プロ グラ ム の 作り 方 の 説明 は 省略 し ます が , 
S .6 で 再帰 的 な 関数 を 書く こと に 慣れ た 人 に と っ て は , そん な に 


match 


to match :p :d 
1f(and (emptyp :p) (emptyp :d)) Loutput :true] 
1f(or (emptyp :p) (emptyp :d)) [Loutput :faLse] 
1jf(or (equalpfirst:p")(equalpfirst:pfirst:d) ) 
[output match (butfirst :p) (butfirst :d)] 
1f(equalp first :p"?) [output match1 :p :d] 
output :false 
end 
to match1 :p :d 
1† match butfirst :p butfirst :d [Loutput :true] | 
output match :p butfirst =:d 
end 


難し く は な いで し ょ う 。 それで, 以下 で も , 例 と を の プロ グラ ム 
の み 示 し ます 。 
いま , saSSertions と 言う リス ト は , ある 時 点 で の , 単語 
に 関す る 事実 を 記録 し た 言明 の リス ト で す 。 そし て , 介 . それ は 
[LNoun man]LVerb go]LNoun animaL]LVerb eat]] 
と な っ て いる も の と し ます 。 
例 | 新しい 言明 が , 言明 の リス ト の 中 に 人 存在 し て いる か どう 
か を 確か め て 、 それ ら を 言明 の リス ト に 付け 加え る 関数 ad 
d を 作り な さい 。 言明 の リス ト に 新しく 付け 加え られ た 場合 
は true,. そう で な いと き は faLse を 値 と し て 返す も の 
本 あま 
この プロ グラ ム は 図 21 に 示し て あり ます 。 
add LNoun woman] 
77944772 
print:assertions 


[Mozz oozl [Wo oz] [| Ve75 gol… 


add 


+o add :pat 
1f has :pat :assertions [output :falLse] 
make "assertions fput :pat :assertions 
output =:true 


end (( 注 )has は 図 4 ) 


例 2 言明 の リス ト か ら パ ター ン に マッ チ す る も の を 見 つけ て 
それ ら 全 部 の リス ト を 値 と し て 返す よう な 関数 fetch を つ 
くり な さい 。 

この プロ グラ ム は 図 22 の よう に な り ま す 。fetch1 と いう 関数 

は 引数 で ある リス ト の 要素 の 中 か ら kpat と マッ チ す る も の だ け 
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を 見 つけ て リス ト に する 機能 を 持っ て いま す 。. 
fetchLNoun @] 


esz/ た [| [Wozz og [Woxz ag] [Vox gg/] ] 


fetch 


to fetch :pat 
output fetch1 :assertions 
end 
to fetch1 :Lis 
1† emptyp :Lis Lout :Lis] 
1 和 † match :pat first :Lis Loutput fput (first 
:tis) (fetch1Cbutfirst :Lis) )] 
output fetch1 butfirst :Lis 
end 


例 3 与 を た られ た だ た パターン に マッ チ す る 事実 を すべ て 言明 の リ 
スト か ら 消 去 する 関数 fLush を 作り な さい 。 を その 値 は , 削 
除 す る 項目 が あれ ば true.、 そう で な けれ ば faLse で す 。 
この プロ グラ ム の リス ト は 図 23 の よう に な り ま す 。 こ れ は fetch 
に よく 似 て いま す 。 
fLushLNoun @] 
刀 esz/ た 77ze 
Print:assertions 
| Vez7 ム gol| Ver ム eg 
以下 で は , match を 少し 改良 し ます 。 こ れ は パタ ー ン の 中 で , 
9 や 2? で 始ま る ワー ド が ある と き , それ が 値 を 得 ら れる よう に す 
る も の で す 。@ 変数 の 値 は ワー ド , ? 変数 の 値 は リス ト で ある と し 
ます 
この と き , match の 新しい プロ グラ ム は 図 24 の よう に な り ま す 。 
よこ あみ CC: ジロ グラ ム 中 に ( 和 fst Fs も sp)。 (But 和 f1 
rstfirstsp) と いう 部 分 が あり ます が , 一 番 左 の f1rst や 
butf1irst は ワー ド に 対す る 関数 で す 。 それぞれ は , ワー ド の 
最初 の 女 字 , ワー ド の 最初 以外 の 文字 列 、 を 表わし ます 。 
matchLa @b @c][a x y] 
旭 esz7 た 77e 
printsbc 
ああ 選 
match [2?Lb ?r]Labcd] 
esz/ た 77ze 
DPTnt st 
DIPTR も sF 
c の 


| 図 23 | flush 

to flLush :pat 
output fLush1 :assertions 

end 

to fLush1 :tis 
1f emptyp :Lis Loutput :Lis] 
1f match :pat first :Lis 
[output fLush1 butfirst :Lis] 
output fput (first :L1s) 
(fLush1 butfirst :Lis) 


end ] 


新しい match (プロ グラ ム 中 の MATCH 1 は 図 26 の も の と 同じ で す ) 


to match :p :d 


1f(equaLp first :p'"?) [output match1 :zp =:d] 


output :falLse 
end 


to match2 :p :d 


end 


1jf(and (emptyp :p) (emptyp :d)) Loutput =:true] 
1f(or (emptyp :p) (emptyp :d)) Loutput :faLse] 
1f(or (equaLp first sp'⑳)(equaLp first sp first :d)) [output match (butfirst sp)(butfirst =:d)] 


1f(and (equaLp(first first :p)" )(match butfirst :p butfirst =:d) ) 
[make (butfirst first :p) (first :d) output :true] 
if(equatp (first first :p)"?) [output match2 :p :d] 


1f match (butfirst :p)(butfirst :d) [make(butfirst first :p)(fput first :d [ ]) output :true] 
1f match :p butfirst :d [make (butfirst first :p)(fput (first :d) 


(thing butfirst first sp)) output :true] 


ここ まで 読ん で き て , 最初 の ほ う の 節 で , Lisp と の 比較 を 行う , 
と 書い た の に も か か わら ず ,。 Lisp な ん て 全然 出 て こない うち に 終 
わり に な っ て し まっ た だ , と 思う 人 が いる か も し れ ま せん 。 実は , こ 
れ ま で の 節 に 出 て きた こと は , すべ て Lisp で 行う こと が で きる の 
で 。 い まる ら 比 較 し て も ムダ な の で す 。 なにしろ る , Lisp は 記号 を 
扱う の が 得意 中 の 得意 で すか ら 。 そう いう わけ で , こと 記号 処理 
に 関す る 限り , LOGO が Lisp の 能力 を 越え て いる と は 言い 難い の 
で す 。 し か し , 考え よう に よっ て は , こん な 程度 に まで Lisp の マ 
ネ を や す や す と や っ て し まう LOGO と いう ヤツ は 本 当 に スゴ イ 言 
語 と 言え を る で し ょ う 。 そ の うえ ぇ , 初心 者 に は LOGO の ほう が は る か 
に 理解 し や すい と い 3 う 特典 まで あり ます 。 なにしろ LISP と きた 


ら , Lots of Insipid Stupid Parentheses (つま ら な い , ば か げた 
カッ コ が た だ たく さん) の 略 だ と 悪口 を 言わ れる くら い に カ ッ コ が 多 
い の で 有名 で す 。 こ れ だ け で も , 初心 者 は ウン ザ リ し て し まう で 
oy 

記号 処理 に 関す る LOGO の 能力 は を うい っ だ た も の で す が LOGO 
に は ター トル ・ グ ラフ ィ ッ ク と いう 強力 な 機能 が ある こと を 思い 
出し て くだ きい 。UCSD PASCAL に も ター トル ・ グ ラフ ィ ッ ジグ 
は あり ます が , これ は LOGO か ら 採 り 入 れ ら れ だ も の で す 。 こ の 
よう に, LOGO は 他 の 言語 の 見 本 に な る こと も ある の で す 。 

で は , そろ を そろ, この 素 晴 し い LOGO が , も っ と 普及 する こと 


を 祈り つつ ペン (実は , 鉛筆 どっ た り し て ) を 置き た いと 思い ま 
す ぁ 


See you again / 


入門 MZ LOGO と リス ト 処 理 77? 


篇 まし た ね 。 


9 月 2 日 , シャ ー プ の 新鋭 416 ビット パ ッ 
ュ ン , MZ-5500 シ リー ズ の 発表 会 は つめ か 
けた 報道 人 で 用 意 さ きれ て いた 席 は すべ て ふ 
る が り , 別 の 部 屋 か ら あ わ て て 椅子 を 持ち 
込ん で いま し た が , それ で も 間 に あ わ ず , 
\ 立 見 ? 続出 の 大 盛況 と な り ま し た 。 

前 日 , 新聞 関係 に 発表 し た こと も あっ て 
「 新 聞 を みた の で す が 」 と いう 読者 か ら の 問 
いあ わせ も 多 (。「 つ い に や っ だ た ね, これ で 
MZ も 活気 づく /」「 る す が シ ャ ー プ だ 。 し 
ん ぼう し た 甲斐 びあ っ だ た 」「 も う 他 社 に 負 
け な い ネネ 」 な ど , コー フン し た 声 が 編集 室 
に 届い て いま す 。 


し か し これ も 当然 。 


MZ-5500 シ リー ズ は , シャ ー プ 伝統 の ク 
リー ンコ ンピュータ 思想 を ひと つの 極限 に 
まで 追及 し た 画 期 的 な パッ コン , と 言え る 
か ら で す 。 マ ウス に よる 入力 , マル チッ ウィ 
ンド 機能 に よる 複数 画面 の 表示 , ドッ トマ 
ッ プ ディ スプ レイ 方 式 に よる スム ー ス な 画 
面 移動 . と いう 新しい 構想 も すばらし いも 
の で す が 。16 ビ ッ ト CPU マシ ン と し て の 
本 来 の 機能 (大 容量 の メモ リ , 高速 処理 性 ) 
を 十 二 分 に 活か し て , パソ ツ コ ュ ン レベ ル で は 
初め て の 本 格 的 16 ビ ピット パ ッ コ ン を 実現 し 
た と 評価 で きる か ら で す 。 


パソ コン は や は り 。 


パソ コン は 入手 し や すい 価格 で ある べき 
で すし , さらに, 使い や すい マシ ン で ある 
べき で す 。 高度 な ば ジネス マシ ン と し て の 
機能 や シス テム を 装備 し て いる こと は 当然 
と し て , 家庭 で も ホビ ー 用 と し て 楽し ん で 
使わ れる べき で し ょ うし , 女性 や 子供 で も 
手軽 に 扱え を る こと が 必要 で す 。 
MZ-5500 は 16 ビ ッ ト の 本 格 的 パー ソナ ル 
コン ピュ ー タ と し て ,。 ホ ビー か ら 高 度 な 数 
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高 性 能 。 低 価格 の 本 格 的 16 ビ ッ ト パ ソコ ン 


MZ-5500 シ リー スズ が 新 合 場 


値 演算 , 日 本 語 処理 , 端末 処理 な どの ビジ 
ネス や 研究 用 の デス クト ッ プ コン ピュ ー タ 
と し て , まる に 汎用 の パソ ュ ン で す 。 ユ ー 
ザー の ニー ズ , ユー ザー の 成長 に あわ せ て 
進化 する , と いう キャ ッ チ フレ ー ズ が 生き 
て いま す 。 マ ウス 入力 装置 し か ドッ トマ ッ 
ププ ディスプレイ 方 式 の 採用 な ど わ が 国 で 初 
め て の 新 機軸 が 導入 る れ た の も 使い や すき 
優先 の た めで し ょ う 。 マ ル チ ウ ィ ン ド 機能 
と あわ せ て , 使い や する を 損 わ ず 高 速 化 を 
図る 工夫 が 随所 に み ら 5 れる の で す 。 


そし て この 価格 で す 。 


16 ビ ッ ト の 本 格 的 マシ ン と し て は 最低 価 
格 の 218,000 円 (本 体 、 キ ー ボ ー ド , 各種 イ 
ンタ フェー ス ,。 それ に シス テム と し て CP/ 
M-86 と シャ ー プ BASIC が つい て いま す )。 
敬 き まし た ね 。 この 価格 は MZ-2000 と 変り 
ませ ん 。 若干 の ユー ザー は , お そら くく 不満 
で し ょ う 。 メ パソ コン の 高 性 能 化 ・ 低 価格 化 
の 現象 は し か し 歓迎 すべ きこ と だ と 思い ま 
す 。 ユ ー ザ ー も 進歩 し ます が パソ コン も ゎ 進 
歩 す る の で す 。 ユ ー ザ ー が 進歩 する た め に 
は や は り パ ソコ ン に 触れ ね ば な り ま せん 。 
安く な る の を 待っ て いれ ば パソ コン に 触れ 
る 機会 が 遠のく の も 事実 で す 。 どこ か で 愛 
機 を 用 意 せ ざる を えま せん 。MZ シリ ー ズ 
に 本 格 的 な 16 ビ ッ ト マ シン が 仲間 入り し た 
こ と, 他社 の 競合 機種 あわ お な お きく し の で 人 性 
能 で , し か も 最低 価格 で ある こと を MZ フ 
ァ ン と し て は 素直 に よろ こぶ べき だ と 思い 
ます 。 


クリ ー ン コン ピュ ー タ 。 

MZ シリ ー ズ の 最上 位 機種 し し て , 5500 
シリ ー ズ は , シス テム ソフ ト を CP/M-86 ( デ 
ジタル リサ ー チ 社 ) に も と め て いま す 。 オ 
プシ ョ ン と し て MS-DOS - (マイ タロ ッ フ ト 
社 ) が 発売 子 定 で すか ら , この ふた だ つが あ 
る か ぎり , シス テム , 言語 . アプ リ ケ ー シ 


ョ ン ・ ソ フト は 世界 中 か ら 自 由 自在 に 選べ 
ます 。 し か も 大 容量 , 増設 すれ ば 最大 512 K 
バイ ト の RAM 人 容量 を 誇り ます し , 外部 ファ 
イル と し て 10M バ イト の ハー ド デ ィ スク を 
利用 で きま す 。V-RAM も 標準 96K バ イト , 
拡張 し て 192K バ イト が 用 意 き れ , GDC に 
よる 640X400 ド ッ ト の カラ ー グ ラフ ィ ッ ク 
ス の 世界 を 堪能 で きま す 。 

BASIC は , BASIC- 1 と し て CP/M-86 
の コン トロ ー ル 化 に あり ます が , MZ-2000 
系 の シャ ー プ BASIC を 採用 し て 互換 性 を 高 
め , さら に ユー ティ イリ ティ と し て シス テム 
コン バー ト を 標準 実装 , MZ 系 の ユー ザー 
が 5500 へ 移行 する の 手助け し て くれ ます 。 他 
に BASIC- 2 と し て 強力 な も の が 用 意 さ れ 
る (オプ ショ ン ) し , マイ クロ ソフ ト 社 の 
GW-BASIC も オプション 提供 きれ , ユー ザ 
ー の 設定 で , 幅 が 広く か つ 柔 軟 な シス テム 
の 使い わけ が で きる わけ で す 。 


多彩 な ソフ トウ ェ ア 。 


きる て MZ-5000 シ リー ズ は 9 月 10 日 か ら 発 
売る され ます が , ほとん ど 同 時 に , 漢字 ワー 
ドド プロセッサ を 初め と する 多数 の ビジ ネス 
ッ フ ト , 敬い た こと に (いや は や , 実に オド 
ロキ の 連続 で す ),「 お も し ろ ゲ ー ム 大 懸賞 
の 特賞 作品 「 タ ナカ の フラ イト シュ ミン レー 
タ 」(PC-9801 用 ) が 移植 きれ て いる の で す 。 
記者 発表 の 会 場 で は マウ ス を 利用 し て の デ 
モ が 行なわ れ ま し だ が, マッ ハ 3 の リア ル 
タイ ムシ ミュ レー ショ ン が 展開 し , 並 いる 
関係 者 を 仰天 3 ね せ て いま し た 。 

ビジ ネス ソフ ト も マウ ス 利 用 で 大 力 が ス 
ムー ス 。 マルチ ウィ ンド 機能 で 理解 を 助け 
て くれ ます 。 そし て , オプ "ショ ン の 漢字 R 


OM, 熟語 ・ 複 合 語 約 80,.000 語 を 収め た 辞 
書 ROM を 利用 すれ ば , 非常 に 読み や すい 
日 本 語 処理 が ワー プロ な み の 手 軽 る で で き 
に 


MZ-5500 シ リー ズ 。 

MZ-5501 は 80 B /2000/2200 の ディ スク ユ 
ー ザ ー が その まま 移行 で きる よう 本 体 と キ 
ー ボ ー ド で 構成 きれ た シス テム で す が , MZ- 
5511 は フロ ッ ピ ー1 基 を 搭載 し て 288,000 円 
で す 。 ま た 最上 位 機 の MZ-5521 は フロ ッ ピ 
ー 2 基 の ほか RAM256K バ イト を 標準 実装 
(5501, 5511 は 128K バ イト ) し て 388,000 円 
で すず 。 

フロ ッ ピ ー は 本 体内 蔵 型 で す (写真 )。55 
01 も スペ ー ス が と っ て あり ます の で , 簡単 
に 内 蔵 で きま す 。 


豊富 な 周辺 機器 。 


イン タフ ェ ー ス は , セン トロ ニク ス 仕 様 
の プリ ンタ イン タフ ェ ー ス 。 CRT イン タ 
フェ ー ス (コン ポジ ッ ト /RGB) : 2 ボー 


ト , ミニ FD イ ンタ フェ ー ス (最大 4 基 コ 
ント ロー ル 可 ), RS232C イ ンタ フェ ー ス (2 
ボート), カモ セット イン タフ ェ ー ス と すべ て 
標準 実装 で す 。 

周辺 機器 し し て まず 注目 され る の が ,「 マ 


主 な 拡張 用 オプ ショ ン 1 


12 型 モノ クロ ディ スプ "レイ MZ-1D10 標準 価格 41.800 円 
12 型 カラ ー デ ィ ス プレ イ MZ-1D11 標準 価格 113.000 円 
チル トス タン ド (MZ-1D10 用 ) MZ-1S09G 標準 価格 10.000 円 
チル トス タン ド (MZ-1D11 用 ) MZ-1S08G 標準 価格 10.000 円 
増設 RAM(128KB・MZ-5501・5511 用 )MZ-1R16 標準 価格 30.000 円 
増設 RAM ボ ー ド (256KB) MZ-1R11 標準 価格 80.000 円 


ウス 」 で し ょ う 。 ア メリ カ で は 多 機 能 の 高 
度 な 入力 装置 と し て 急速 に 普及 し つつ あり 5 
ます が 国産 機 に 搭載 で きる の は MZ-5500 シ 
リー ズ が 初め て 。 手許 を 気 に せ ず 画 面 を み 
な が ら ス ムー ス に カー ソル を 移動 きせ て 座 
標 入力 が で どき ます か ら , ビジ ネス 処理 か ら グ 
ラブ フィ ックス まで 。 キー ボー ドコ ンプ レッ 
クス の 強い わた し た ち 日 本 人 に は パッ コン 
を 自在 に 使い こなす た め の 必 需 品 と 言え る 
和 し まあ 

これ は 速報 で す 。 

次 号 で 詳し 解説 し た いと 思い ます 。 と 
り わ け BASIC- 1 と MZ-2000 系 の BASIC 
と の 比較 や , シス テム の 構成 に つい て きま 


ざま の 角度 か ら ア プロ ー チ する 予定 で す 。 
ご 期待 くだ さい 。 


増設 ビデ オォ RAM ボ ー ド (96KB) MZ-1R09 標準 価格 35.000 円 


漢字 メモ リ MZ-1R10 標準 価格 30.000 円 
辞書 ROM ボ ー ド MZ-1R14 発売 子 定 
数 値 演算 プロ モッ サ (8087) MZ-1M03 発売 子 定 
拡張 ニ ユニット (4 スロ ッ ト ) MZ-1U05 標準 価格 12.000 円 
デー タレ コー ダ MZ-1T03 標準 価格 12.000 円 


マウ ス MZ-1X10 標準 価格 19.800 円 
ミニ フロ ッ ピ ー 刻 スク ドラ イブ (内蔵 増 設 用 )MZ-1F09 標準 価格 70.000 円 
ミニ フロ ッ ピ ー テ ディ スク ドラ イブ MZ-1F02 標準 価格 158.000 円 
フロ ッ ピ ー 接 続 ケ ー ブ レ (MZ-1F02 用 )MZ-1C33 標準 価格 6.800 円 


フロ ッ ピ ー 接 続 ケー プル (MZ-80BF 用 ) MZ-1C37 発売 子 定 
80 桁 ドッ ト プ リ ンタ MZ-1P02 標準 価格 138.000 円 
132 桁 漢字 プリ ンタ MZ-1P03 標準 価格 540.000 円 
カラ ー イ ンク ジェ ッ ト プ ブリ ンタ  MZ-1P04 標準 価格 228.000 円 
80 桁 漢字 プリ ンタ MZ-1P06 標準 価格 234.000 円 
80 桁 シリ アレ プリンタ MZ-1P07 標準 価格 79.800 円 
プリ ンタ 接続 ケー ブレ MZ-1C32 標準 価格 6.800 円 
RS-232C と ケーブル (バラ 線 ) MZ-1C34 標準 価格 4.800 円 
音響 カプ ラ MZ-1X11 発売 予定 
RS-232C ヶ ケー アル (MZ-1X11 用 ) MZ-1C36 発売 子 定 
ハー ド デ ィ スク MZ-1F10 発売 子 定 


Uh/ シ リー スズ 掲載 ブロ グラ ム の = 
mmmmmm 最寄り の / パ ソコ ン シ ョ ッ プ て 好評 発売 中 / 時 是 リー ダ ー ズ サー ビス 


Elder Man の 
X 1 用 


3,200 円 

本 誌 7 月 号 で 発表 し た , お も し ろ ゲ ー ム 1 
_ 等 賞 受 賞 作品 「 前 戦 基地 」 の カセ ッ ト を, リ 
ー ダ ゲー ズ サ ービス の 一 環 ほ と し て 始め まし た 。 

第 2 次 大 戦 . ヨー ロッ 戦線 最大 の 攻 恩 戦 。 
連合 軍 は 総力 を あげ て ノル マン ディ 上 陸 作 戦 
を 敢行 し た 。 上陸 後 、 ヨー ロッ パ 大 陸 の ドイ 
ツ 軍 を 一 掃 す べく , 前 戦 基地 を 築き 一斉 攻 
撃 の 準備 を 整え て いる 。 ドイ ツ 軍 は 死 命 を 決 
する この 戦い に 反撃 を 開始 し た 。 さ あぁ, 君 が 
この 前 戦 基地 を 守り ぬく の だ 。 


テー プ 版 


マッ ハ 9 PC-9801 用 


「 フ ライ トシ ミュ レー タタ 


5 イン チ フ ロッ ピー ディ スク 6.800 円 

8 イン チ フ ロッ ピー ディ スク 7.800 円 
高速 3 D リ グラ フィ ッ ク を 駆使 し た , 本 格 的 
フラ イト シミ ュ レ ー タ 。 完 璧 な 3 次 元 処理 で , 
英機 、 地形 と も リア ル に 表現 きれ , 着陸 時 の 
振動 や 敵 機 の 空中 分 解 。 失速 も シン ミュ レ ー ト 
され て いる 。 この 迫力 に つい て いけ る か 1!? 


PC-9801 用 


「 ス ペー ス ・ エ ン バ イ ア 


トド 0 ai し RS 3 
5 イン チ フ ロッ ピー ディ スク 5.800 円 
8 イン チ フ ロッ ピー ディ スク 6.800 円 
君 と コン ピュ ー タ が , 国連 軍 ・GIGA 軍 に 分 
か れ て , 銀河 全域 を 背景 に 一 大 植民 地 争奪 戦 
争 を 開始 し た 。 極め て 過激 で , 帝国 主義 的 ・ 
軍国 主義 的 な , 大 型 ウ ォ ー・ シ ミュ レー ショ 
ン ゲ ー ム 。 


mrsvs (株 ) 日 本 ソフ トバ ンク 出版 部 "“" 六 二 語 " 


MZ-5500 シ リー ズ が 新 登場 7 ぢ 


ケー スス タデ ィ 教 室 で 活躍 する MZ 


加 因 団 国 団 占 較 


g@⑳8W 量 天 
* い ま 準 備 し ます の で ? 
MZ-721 を 小脇 に か か え , いそ ぎ 足 て 階段 を 
登っ て 行く 先生 に は , それ だ け で も 情熱 を 
感じ きせ る も の が あり ます 。 
ここ 関東 学院 小学 校 は 横浜 市 の 山の手 に 
ある 有名 私 立 校 で す 。 黄 金町 駅 か ら 歩 く こ 
と 約 10 分 , ずっ と 坂道 で 多少 は こたえ ます 
が , それ だ け に 校舎 か ら 市 街 が 一 望 で き , 
景観 は な か な か の も の 。 
八木 沢 薫 先生 (31 歳 ) は , 同 校 の 6 年 生 
の 受け 持ち で , 若 さ と 情熱 に あふ れ , 子供 
た ちか ら の 人 気 も 絶大 。 そ れ も そ の は ず , 
先生 は 教室 に MZ を 持ち 込ん で 授業 を する 
の で す 。 
パッ コン は 個人 学習 用 だ どけ の も の で は 
あり ませ ん 。 パ ソコ ン の 画面 を 通し て 考 
える せれ ば , 子供 た ち は み ん な 興味 を も 
っ て 学習 に 臨ん で くれ る ん で す 。 こ こ で 
は 記憶 の た め の ト レー ニン グマ シン と し 
て で は な く , 想像 の 手 ど すけ と し て 役 立 
で うう 届 才 えて いな ん 下す 沿 だ 
この よう に , パソ コン を 教育 に 利用 する 
こと に 対す る 八木 沢 先生 の ポリ シー に は は 
っ きり し だ た も の が あり , その 効用 に つい て 
も 自信 ち を もっ て お られ る よう で す 。 
学校 に は , 似 た よう な 使い 方 と し て , 
OHP (Over Head Projector) と いう の 
が あっ て , これ は あら か じ め 用 意 し て い 
る 絵 を 差し 換え な が ら 使 うち も の で , それ 
が いま 普及 し て いる ん で す が , 
の 方 が も っ と 楽し て, また リア ル に 表現 
で きる の で は な いか と 思い まし て …… @ 
パソ コン な ら ,。 も っ と 操作 も 簡単 だ し , 
実際 に 見 る こと の で き な い も の で も , あ 
る よう 仮に 表示 し た り , 理解 で きる まで, 
繰り 返し 見 せる こと も で きま すか ら ね 。/ 
で は 授業 の じゃ ま に な ら な いよ うに と , 


ケツ は ジグ 
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う しろ の ドア か ら 入 る と ,。 いっ せい に “ よ 
ろ し おねがい しま ー す 必 ” と いう 子供 た 
ちの 声 。 うーん, ムチ ャ クチ ャ 元気 だ ん 

さて パソ コン 授業 を 始め る に は , まず S- 
BASIC, 次 に 授業 で 使う プロ グラ ム を LOAD 
し な けれ ば な り ま せん 。 LOADING 中 は , 
まえ ぇ おき や , 前 回 の 復習 な ど で 間 を も た せ 
る わけ で す が , 子供 た ち は , 画面 が 出る の が 
わけ で す が , 子供 た ち は , 画面 が 出る の が 
待ち ど お し く て た だ たま ら な い 様 子 で す 。 し ば 
らく し て 先生 が "も うそ みそ る だ よ " と 言 
うと , す で ぐる きま LOAD 完了 (し っ か り カ ウ 
ンタ ー を 見 て いる の で す )。 を し て か わい い 
風景 が 描 わ れ ま す 。 この 日 の 理科 は , 太陽 
高度 の 話 で す 。 

太陽 が TV ゲー ム の ご と くく, お か し な 動き 
を 見 せる と, すでに 子供 た ち は 反 応 を 示し 


ずら 
生徒 A だ め だ よ /” 
先生 パ * ど こ が い ちば ん お か し い ?7 
生徒 B “エー ト , 直角 に 昇っ て いる ? 
2 パソ コン を 教具 と し て 
生徒 C 太陽 に 顔 が つい て いる / 


利用 し よう 


】 現在 。 学校 に お ける パソ コン 利用 は 3 
る 名 し 。 js (トド ど ャ 2 問 生 放 (8 前 生 CR 
で いき , も りあ が っ て くる と 喝 在 。 公 立 小学 校 24.800 核 の うち 27 校 ) で 
た ち に 負け な いく らい 大 き な 調 識 也 カ げ 。 す が . 某 な どの 教育 衣 & 4 パソ ュ ン の 
ます (過熱 ぎみ ? )。 私 と カメ 訴 基 計 用 に 進ん で いま 共 か し を の 
の で , 気 が 散 。 の で は な いか | 
し た が , 全 て 無用 の 心配 だ っ 7 縛 計 
それ に し て も , 画面 に 見 い 
た ちの 表情 の 好奇 心 に 満ち て 詩 
ほん と , これ だ け 子 供 た ち を 
授業 が で きる な ん て ステ キ な 
明る 楽し い 授業 を 観 せ て い 二 本 3 」 3 
し くも あり , そし て な に ょ りゃ 琴 楽し て 
い 思 いで す (T)。 5 答 多 か 


先生 ^ そ ん な ん じゃ 
お か し いこ と カ 敵 


。 は 失 理 孝和 カ を 在 う 
れ だ り し て いま す 。 中 2 
な いも の 

まい っ だ さ 
区 れ が 中 心 


ロ 
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ー ム に 夢中 に な っ て いる 子供 た ち に , コン 
ピュ ー タ 画像 を 利用 し て 教育 を 行っ た ら , き 
っ と 興味 を 持っ て 学習 に 際 ん で くれ る の で 
は な いか と 考え て いま し た 。 現在 の CAI ( 個 
人 学習 用 ) 的 な 利用 で は , 1 耕 の 80B で は 
と う て い クラ ス 全 員 を 満足 さす せる こと は で 
きま せん 。 か と いっ て ,。 だ くさ ん の マイ コ 
ン を 購入 する こと も で きま せん 。 そん な 思 
い の 中 で , 個人 を 対象 と する の で は な く , ク 
ラス の 生徒 全員 を 相手 に し て コン ピュ ー タ 
授業 が で ぴき な いか と 考え る よう に な り ま し 
た 。 そ ん な と き , MZ-700 シ リー ズ が 発売 き 
れ ,、 その 低 価 格 と , 小 型 ・ 軽 量 , それ に と どん 
gc (に で も 基本 シス テム だ け で 接続 す 
"きる 性 能 は , 私 の 考え る 教育 利 
だ り の も の で し だ た 。 そ こ で きっ そ 
00 を 購入 し , 利 用 し て みた わけ で す 。 


気 が る に で きる CAI 


も は , 多く の 小学 校 に 視聴 覚 機器 と 

の アシ ス 時 間 較 デ オォ テ レビ が 設置 され て いま す 。 
還 葵 り ま す 。 各 教 室 に 1 台 ず つ テ レビ の 置か れ て いる 学 
考 力 を 養 校 も 数 多く , これ ら 一 般 の テレ ビ (RGB 対 
える わけ 応 な ら 申 し 分 な い の で す が ) に 接続 可能 な 
パソ コン を 利用 する こと に よっ て , 教育 放 


に MZ-80 
みや LSI ゲ 


送 を 見 る 気軽 さ で , コン ピュ ー タ を 利用 し 
た 授業 が びき る の で す 。 あ と は どん な プロ 
グラ ム に より , どん な 絵 や 図形 を 描き , 動 
か し た りす る か と いう こと が 問題 し な る だ 
け で す (実は この 部 分 が 一 番 大 変 な 所 で , 
利用 し よう と する 方 の 熱意 と 努力 に 負う 所 
が 多い の で す が )。 

き て 一 般 の テレ ビ に 接続 可能 な パッ コン 
は 何 機種 も あり , 特に 今回 紹介 する MZ-700 
に は RF モジ ュ レ ー タ を 本 体 に 内 臓 し て いま 
す 。 ま た MZ-721,731 の 場合 は カモ ッ ト テ ー 
プレ ュー ダ が 組み 込ま れ て なり, この シス 
テム な ら 百 科 事典 一 冊 か か えて 教室 へ 行く 
気軽 る き で, ユン ピュ ー タ の 持ち 運び が で き 
ます 。 し か も MZ-721 で 89.,800 円 。 大 変 安 
い 子 算 で CAI 教育 を 始め る こと が で きる の 
で す 。 


現代 の 子供 た ち は テ レビ っ 子 と いう 言葉 
が 生ま れる ほど テン ゼ が 好き で す 。 で こ で 
テレ 画面 に カラ フル な 色 で , 絵 ・ 文 字 . 
図形 な ど が 表示 され る と , 大 変 興味 を 持っ 
て , また 集中 し て 画面 を 見 , 学習 に 取り 組 
ん で くれ まし た 。 元 来 , 学習 好き な 子供 は 
少な く , 言葉 や 黒板 に 書い た 文字 や 絵 な ど 
に は な か な か 集中 し て くれ ませ ん 。 し か し 
業 に 典 味 を 示さ な い 子 供 た ち で も , 学習 
を し て いる と いう より 遊び と し て テレ ビ を 
見 る 感覚 で , 熱心 に 見 ,。 それ に 加え て 次 に 
どう な る か と 積極 的 に 想像 し て くれ まし た 。 

その 時 の 子供 た ちの 生き 生き と し た 表情 
と 学習 へ の 意欲 に は げ ま る れ な が ら , い 〈 
つか の プロ グラ ム を 作り 実践 し て 来 ま し た 。 

こう し て パソ コン を 利用 し た 授業 を 行っ 
て は っ きり 学習 効果 の 現れ た の は ,「 火 と 空 
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気 」 と いう 単元 で し た 。 パ パソコン を 利用 し 
た の は 単元 の 中 の 一 部 分 で ある に も か か わ 
ら ず 子供 た ち は こ の 単元 全体 に 興味 を 示 
し て くれ まし た 。 その 結果 , 最後 の 単元 テ 
スト に お いて は , 以前 , 同学 年 を 担任 し 同 
じ 単 元 を 教え た 時 より , 同じ よう な 内 容 の 
テス ト を し た に も か か わら ず 。 平均 点 が 10 
点 は ほど も 上 が り , 89 点 に も な り ま し た 。 平 
均 点 を 出し て 大 変 泡 き ,、 テス ト の 間 題 が 易 
し すぎ た の で は な いか と , 他 の 先生 に 問題 
の 難易 あど う か が っ た ほど で し た 。 効果 が 十 
分 認め られ る こと は 事実 で し ょ う 。 


教育 へ の パソ コ ン 普及 に 期待 / 


これ ら の 例 か ら も , 子供 た ちの 感性 に 合 
っ た パソ ュ コン を 利用 し て の 学習 は , 子供 た 
ち に 素直 に , そし て 新鮮 な 感覚 で 受け 入れ 
られ る よう に 思わ れ ま す 。 そ こ て で 今 後 , 私 の 
考え る よう な 利用 法 で みん な に パソ コン を 
活用 し て も ら う た め に は 教育 用 プロ グラ ム 
が た くさ ん 開発 きれ る こと が 必要 で 。 よい 
プロ グラ ム が 容易 に 入手 どき る よう に な ら 
な けれ ば な り ま せん 。 

これ か ら は 。 も っ と も っ と コン ピュ ー タ 
の ハー ド が 進歩 し , 細か い グ ラフ ィ ッ ク が 出 
来る 様 に な る で し ょ う 。 そ うす れ ば 黒板 と 
いう 平面 的 な 世界 か らち ぬけ だ し , 立体 的 に 
示す こと も 可能 に な る で し ょ う 。 天体. 太 


陽 と 月 と 地球 の 関係 (月 の 満ち 欠け な ど ) は , 


な か な か 頭 の 中 に 立体 的 に 想像 する こと が 
で きま せん 。 そのため 子供 た ち に は な か な 
か 理解 し て も ら え ませ ん 。 そん な 立体 構成 
に つい て も , ソフ ト テ ー プ ジ 1 本 で 手軽 に テ 
レビ 画面 に 示す こと が で きる よう に な っ た 
ら す ば らし いと 思い ます 。 こ の よう な 使わ 
れ 方 が 進め られ る こと を , 心 か ら 望 み ま す 。 

きる て , 私 が パソ コン を 利用 し て 授業 を す 
る よう に な り , コン ピュ ー タ が どん な も の 
か 知っ た 子供 た ちの な か に は , パソ コン を 
買う 者 , ま た 欲し く て 一 生 懸 命 お 金 を 貯め る 
者 , 中 学生 に な っ た ら 買 っ て も ら う と 約 東 
し た 者 な ど た く る ん で て きま し た 。34 人 の 
クラ ス の 中 に パソ コン を 持っ て いる 生徒 が 
8 人 , 近々 手 に 入れ る こと に な っ て いる 生 
徒 も 合 め る と 17 人 , すなわち 半数 も いる の 
で す 。 ハ ー ド メー カー や ソフ ト ハ ウス し と し 
て も この 事実 に 注目 し て , 臣 非 学校 教育 へ 
の コン ピュ ー タ 普及 に 対し て も 力 を 注い で 
ほし いと 思い ます 。 
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子供 の 感想 文 か ら 


「 パ ソン コン 授 業 を 受け て 」 
6 年 a 組 神谷 泰樹 

ぼく が パソ コン の 授業 を 受け た の は , 5 
年 生 に な っ て か ら で す 。 パ ソコ ン と いう 言 
葉 は 何 度 か が 耳 に し まし た が , どう いう も の 
か ,。 どん な ふう に 使う の か は , は っ きり わ 
か り ま せん で し た 。 で も , 授業 を 受け る よ 
うに な っ て か ら 興 味 が 出 て きま し た 。 ン パソ 
ュ ン を 使っ た 授業 は 理科 , 算数 で す 。 

テレ ビ に 接続 し て 先生 の 作っ た プロ グラ 
ム を 入れ る と , 太陽 高 度 を 表す 絵 や 、 ロ ー 
ッ ク の 燃え る 実験 で す 。 画 面 が 動 《 の で 太 
陽 高度 だ どの よう に 変わ る の か , 空気 の 量 
に ょ る ロー ソック の 燃え 方 な ど が よく わか り 
ま も だ 8 

クラ ス の 友達 た ちゃ めずらし い 授 業 だ か 
ら , 真 け ん に 見 て いた よ う で す 。 算数 の 通 
過 算 も わか りや すく , 授業 が 終っ て か ら も , 
画面 を 思い 出し な が ら 解 け ま し た 。 

プロ グラ ム を 作る 先生 は 大 変 ど な と 思い 
ます が , パッ コン を 使っ た 授業 は , 皆んな 
が 楽し み に し て いる し , 時 々 ゲー ム を させ 
て くれ る の で 面白 いで す 。 こ れ か ら も 先生 
に が ん 張っ て ほし いと 思い ます 。 


9 さき ジコ ヨシ 
6 年 b 組 藤野 由紀 子 
近代 的 人 間 - 一 一 一 一 。 

この 人 間 の 頭脳 で . こん な に すばらし い 
機械 が 出 き る と は , 思っ て も いな か っ た 。 

今日 で は , 多く の 人 が パッ コン を 操作 で 
きる よう に な っ て いる 。 

現在 , 私 の 通っ て いる 学校 の 算数 の 時 間 , 
理科 の 時 間 は 楽し み だ 。 それ は , パソ コン 
を 使っ た 授業 が 出 き る か ら だ 。 聞 く 楽 し き 
と 見 る 楽し き が ある 。 楽 し い 事 は , 忘れ た 
《 て も 忘れ られ な い 。 授業 だ っ て 同じ こと 
だ と 思う 。 ま じ め す ぎる の は 問題 あり 。 面 
折 す ぎる の も 問題 あり 。 中 位 の , 面白 まじ 
め が い いと 思う 。 

私 は , パパ ツ コ ン の 授業 を 受け て か ら 。 濾 
数 の 図形 が 好き に な っ た 。 図 形 に 限ら ず , 
他 の も 分 か る よう に な っ た 。 少 し ずつ 拡大 
る れ た り , 線 が の び た だ り , 目立つ よう に 色 
を 変え だ り , 変わ っ た 音 を 出し た りす る 。 
私 は 前 か ら パ ソコ ュ ン に 興味 が あっ た 。 授 業 
に これ が 採り 入れ られ た こと は , と て も う 
れ し い で す 。 


人 の @ 人 @ 


今回 、 八木 沢 先 生 に お 会 いし て , 改め て 
パソ コン は 使い 方 が 問題 な の だ と いう こと 
を 実感 さき せら れ ま し た 。 私 た ち は と も すれ 
ば , この あたり まえ の よう な こと も 忘れ て 
し まい , その 結果 , 機械 に 対す る 先入観 で 
コン ピュ ー タ の 可能 性 を の が め て し まう 札 
れ が ある の で す (T)。 


今後 は 日 本 で も 教育 へ の パッ コン の 利 
用 が 普及 する こと は 間違い な いと 思い ます 。 

こ で , 私 た ち は , 教育 は けっ し て コン ピ 
ュー タ に まかせ られ る も の で は な く 〈, 主体 は 
人 に ある と いう 前 提 の も と で の 利用 を 進め 
て いか な けれ ば な ら な いと 思い ます 。 


SAMPLE PROGRAM 1 


ER クウ キ 


この プロ グラ ム は 。, 5 年 生 の 理科 の 単元 
「 火 と 空気 」 の 学習 に 利用 し た も の で , いろ 
いろ な 容器 の 中 で ロー ソック を 燃やす 実験 を 
し た あと で 知識 の 確認 を する た め の も の で す 。 
①ー⑦ の 画面 か ら で き て お り , いろ いろ 
な 容器 の 中 で ロー ソ ク を 燃やし た と き , そ 
の 燃え ぇ 方 や 燃え て いる 時 間 な ど を 推 穴 し な 
が ら 燃 える と いう こと , 酸素 や 二酸化 炭素 
の 関係 を 理解 させ る も の で す 。 も し 途中 で 
わか ら な く な っ た だ たり, も う 一 度 前 の 画面 が 
見 た いと 思っ た と き に も , 必要 な 画面 表示 
キー を 押せ ば , 何 度 で も 繰り 返す こと が で 
きる の で , みん な が 納得 する まで 簡単 に 表 
示 を 繰り 返す こと が で きま す 。 


一 [| 画面 選択 
END, READY の 状態 し な り ま す 。 
S 画面 2 一 7 で ロー ソック に 火 が つ 
きま すず 5 


先生 ね え 君 た も, この ピン ク 色 の 帯 , 何 
だ と 思う ? 


生徒 A た ぶん ね ー, 火 が 燃え る と き に 出 
る ご 酸化 応 玄 だ と 思う 。 だ っ て 。 だ し か ご 
酸化 炭素 は 空気 より 重い ん だ っ た か ら …… 
先生 うん , よく わか っ だ ね, ほん と う は 
こん な 色 に は 見 えな いん だ けど ね (ここ が 
コン ピュ ー タ の いい と ころ )。 


E 燃 を つづ ける 画面 を スト ッ プ る 
せる と き に 押し ます 。 

画面 1 大 小 2 つ の 容器 が 表示 さる れ ま す 。 
まず , これ は 円 筒 形 の 容器 を 横 か ら 見 た も 
の で ある こと を 説明 し , この 2 つの 容器 の 
中 で ロー ソ ク を 燃やす と , どちら が 長 〈 燃 
える か を 考え ん えて も らい ます 。 

画面 2 小 き な 容器 どけ が 表示 され ます 。 
S キー を 押す と , ロー ソ ク に 火 が と も り 5, 
ロー ソ ク の 周り が チカ チカ 光り な が ら , 容 
器 の 下 の ほ うか ら 赤 い 帯 が だ ん だ ん 長く の 
び て 行 きま す 。 2 段 目 ま で 帯 が の びる と , 
そこ で 火 が 消え ぇ , 画面 の 右上 すみ に は , ジ カ 
ン 5 ビョウ と 表示 る れ ま す 。 生 徒 た もち に は 
この 赤い 帯 が 何 を 意味 し て いる か 推理 し て 
も らい ます (読者 の みな る ん は わか り ま す 
ネー)。 

画面 3 大 きい ほう の 容器 が 表示 され ま 


先生 画面 1 の 2 倍 ち ょ っ と の 大 きる だ と 
する と , 何 秒 で らい 燃え て いる か な ? 
生徒 B さっき の が 5 秒 だ っ た か ら 2 倍 ち 
ょ っ と で 12 秒 で らい か な 。 


先生 さて どう か な 。 (回 を 押す ) 

生徒 C と あれ / 10 秒 で 消 を ちゃ っ た / 
生徒 D そう か / 二酸化 炭素 で ロー ソ ク 
が うま っ ちゃ うん だ 。 


す 。 S キー で スタ ー ト させ, 1] で 考え た 大 
き な 容 器 で は 長く 燃え を る と いう こと を , も 
う 一度 確 認 し ます 。 

画面 4 小さな 人 容器 と 同じ 底面 積 を 持つ 
が , 縦 に 長い 容器 が 表示 され ます 。 こ の 容 
器 の 中 で は , どの くら い 和 炎 が 燃え 続け る か 
を 考え る せま す 。 色々 な 意見 が だ され た だ た あ 
と , それ で は と , S キ ー を 押し ます 。 こ の 
場合 , 二酸化 炭素 の 帯 が 4 邊 目 の と ころ ま 
で の びる と , ロー ソ ツク が 埋 っ て し まい , 火 
は 消え を ます 。 

画面 5ー7 それ ぞ れ , 下 に すき 間 の あ 
る 容器 、 上 に 穴 の あい た 容器 , 横 に 穴 の あ 
いた 容器 が 表示 され ます 。 今 まで の 知識 を 
考え 合わ せ , それ ぞ れ の 容器 の 中 で どの よう 
に 燃え る か を 考え ます 。 


先生 それ で は , この 容器 の 場合 どの よう 
に 燃え を る か な ? 

生徒 E 入れ も の の わり に すき 間 が 大 きい 
か ら , ずっ と 燃え る と 思う 。 

生徒 F 重い 二酸化 炭素 は 下 か ら 外 へ 出る 
し , 新しい 空気 も 入る か ら , ずっ と 燃え る 
ん じゃ な いか な 。 

先生 で は 火 を つけ て みる か ら ね 。 

生徒 わあ ーー, 思っ た 通り だ 。 おもしろ い 。 
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タイ ヨウ コウ ド 


この プロ グラ ム も 理科 の 学習 用 に 作っ た 
も の で , 5 年 生ま で の 太陽 の 動き の 復習 と 
6 年 生 で 学習 する 太陽 高度 に つい て を , 画 
面 を 通し て 学ぶ も の で す 。 

全体 は 3 つの 場面 より で き て お り , RUN 
する と , 第 1 の 画面 が 表示 され ます 。B の 
キー て 次 の 画面 へ 、 Y キー で 前 の 画面 へ 移 
る こと が て きま す 。 

画面 1 太陽 の 動き 

山 や 家 の あ る 景色 で , この まま で は どの 
方 向 を 見 た も の か わか り ま せん 。 を そこ て 上 
キー を 押す と 中 央 の 高い 所 に 太陽 が 表示 き 
れ ま す の で , これ で 方 向 が わか る か どう か 
きい て み ま す 。 

で は 較 と 国 キ ー で 画面 に 「 に し 」 と 「 ひ 
が し 」 を 表示 る せま す 。 次 に , 還 , 国 , 
の キー を 押す と それ ぞ れ 太陽 が 特殊 な 動き 
方 を し ます の で , どこ が お か し いか 考え て 


も らい まし ょ う 。 では, この 空 を 太陽 は , 
どの よう に 動く の で し ょ うか 。 
そこで, 回, [@@ キ ー で は , 太陽 の 動き を 


表わす 2 種類 の 半 円 軌道 が 描か れ , [, 回 , 


団 キ ー で は , それ ぞ れ の 軌道 の 頂点 お よび 
東 の 日 の 出 の 位置 に 太陽 が 表示 され ます 。 


これ ら の 画面 を 通し て , 太陽 の 動き 方 や , 
太陽 の 高き と , 季節 や 時 間 と の 関係 を 復 百 
し て も らい ます 。 

で は 国 キ ー で 画面 2 へ 移り まし ょ う 。 


画面 2 太陽 の 高 さ と 日 ざし 

窓 の あい た 家 の 絵 が 画面 に 描か われ ます 。 
印 , 図 , 還 キ ー で , 左上 の 3 ヶ所 の 高き の 
異な る 位置 か ら 太 陽光 が 発っ せら れ , それ 
ぞ れ 途中 で 止 っ て し まい ます 。 ま ず こ れ ら 
の 日 ざし が 家 に 入る と , 家 の ど の 辺 ま で き 
し こむ か , また 一 年 の 季節 の うち いつ ご ろ 
の も の か を 聞き , 回 キー で 確認 し ます 。 


さて , この よう な 太陽 の 春 夏秋 冬 の 高き 
は , 今 まで 見 た 絵 (画面 ) の こと を 考え て 
何で あら わし た ら よ いで し ょ うか 。 日 ぎし 
の 長き る , 家 の ど こま で は いる か で あら わす 
ょ よい の で し ょ うか 。 

ここ で 色々 な 意見 が 出さ れ ま す が , 角度 
で 表す と いう 5 意見 が 出 な い 場 合 は , 国 キ ー 
で 画面 3 を 出し , 低 ・ 中 ・ 高 の 位置 か ら の 
太陽 光線 と , 地面 が 作る 角度 に 注目 させ る 
高き が か わる こと に よる , 角度 の 変化 に 気 
づか ぜ る よう に し まず 。 

画面 3 太陽 の 高き と 棒 の か げ 

還 , 図 , 団 キ ー で , 低 ・ 中 ・ 高 の 位置 に 
太陽 を 表示 し ます 。 

四 キ ー を 押す と , 太陽 か ら 光 線 が 出 ます 。 
国 キ ー を 押す と , 太陽 と その 光線 は 消え 
まま 吉 。 


先生 さあ , この 画面 を 見 た な だ どけ で , この 


絵 (この 景色 ) が , 
わか り ま すか ? 
生徒 A この 画面 だ け で は わか り ま せん 。 


と どの 方 向 を 見 た も の か 


先生 この よう に 景色 の 中 央 の 高い 所 に 太 
陽 が で て いた と し た ら , 方 向 が わか り ま す 
か ? 

生徒 B 太陽 は 南 の 空 を まわ る か ら , 南 の 
方 向 を 見 た 景色 だ と 思い ます 。 

先生 そう で すね 。 で は この 画面 の 右側 ・ 
左側 は どの 方 向 で し ょ う 。 

生徒 C 山 の あ る 方 が 東 で 。 家 の ある 方 が 
西 で す 。 


ー 一 西 か ら 6 太 陽 が まっ すぐ で 上 に 登り 始め , 
途中 で 止 り , も と に 戻っ て し まい ます 。 

生徒 た ち 変 ど びん お か し いみ 

先生 そう , 変 で すね 。 太陽 も お か し いと 

思っ て 引き 返し て し まい まし だ た よ 。 で は な 

ぜ お か し い の で し ょ う 。 

生徒 D 西 か ら 出 て いま す 。 太陽 は 東 か 6 

出る ん で す 。 
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プロ グラ ミン グ に つい て 


私 た ち 教 師 は , 教育 に 対し 熱心 で あれ ば 
ある ほど 忙し て な っ て , まとまっ た 時 間 を 
プロ グラ ム 作 り に さく こと が で きま せん 。 
私 の 場合 は , 朝 , 出勤 を 早め て , 1 日 30 分 
か ら 1 時間, 少し ずつ プロ グラ ム を 組み 立 
て , 1 一 2 週間 長い ちの で は ひと 月 以上 


いま せん 。 し か し , 問題 は ゲロ グラ ム の テ 
クニ ッ ク で は な く , いか に 生徒 た な ち に わか 
りや すく 〈 考 ぇ を 展開 させ る か が , 最も 重要 
な こと だ と 私 は 考え ます の で ,。 プロ グラ ム 
の 良し 悪し に と ら わ れず , 知っ て いる 文 法 
(言葉 ) だ け で 組ん で 行け ば 良い と 思っ て い 
ます 。 つ け 足 し だ ら け で 長く て な っ て . も 良い 


サン プル プロ グラ ム を 見 て いた だ けれ ば 
わか る と 思い ます が , 易しい ステ ー ト メン 
ト ば か り で す 。GET・PRINT・IFー THEN・ 
FOR 一 NEXT・SET・RESET・GOTO・GO 
SUB・CURSOR な ど ご く 一 般 的 な も の が 主 
で , 動き も FOR 一 NEXT で 動か す も の ば 
か り で す 。 む ず か し く 考 える こと は あり ませ ん 。 


も か け て 作っ て いる の が 現状 で す 。 で すか 
ら メ イン ブロ グラ ム に つけ 足し つけ 足し で 
整然 し し た 見 や すい プロ グラ ム と な っ て は 


で は あり ませ ん か 。 み な さん も , 自由 に 作 思い 立っ た ら る っ そ 〈《 作 り 始 め て くだ さい 。 


っ て みて ほし いと 思い ます 。 


5BO CURSDR15 ょ 12:PRINTE2。] "に " 
3 25 ュ ウ ウフ 3 ログ 2" う ム 590 CURSUR15。 13:PRINTLE2。] "WW 
し AP で 


・YaG1SRMR 


ら 610 
62O 


T! ま ="QO00000" 
FOR =1TOD 12 


FRINT" 630 FOR J=1 TO 150:NEXT J 
110 FRTNT" ※ * 人 64O_ CURSHR ワ +1 』17 ょ PRTNT[ さ 。 ]" 導 " 
ぞ の FRINT" ※ 表 * も を るる る する する 1 沙 水 氷 ※ 氷 ※ り 65O GOBUB さ 2 フ プ の 
13O FRINT" 人 1 NL た 生 要 る 作 人 い も S2B 他 > を 1 660 BUSUB さ 240 
14Q FRINT" し 人 / ボ * 。*※ ポ を する る る 9 67O NEXT r 
150 PRINT" 1 も る 1 涼 ポリ 6BO FDR 1=1TD 12 
160 PRINT" * キネ 1 ポ ※※ 水 ※ ネネ ネリ 690 FUR =1 TO 15QkNEXT J 
170 PRINT" ※ 1 ル 。 ※ り 700 CURSDR9+ 1 、16: PRTINT[ さ 。 ] " 較 " 
180 FRINT" ※* っ 1 * 人 3 710 BUSUB さ 27O 
190 FRTNT" ※ ボ ポポ ポポ ネネ ボボ ポ も る 3 720 BUSUB さ 240 
200 GET R 代 73 さ O_NEXT 1 
210 IF =1 THEN PRINT" 屋 ": GBDTO OO 74O_ FOR J=1 TD 150NEXT J 
220 IF a=2 THEN PRINT" 悦 "* BHT 45O 75O CURSOR15』12:PRINTL2。]"  " 
23O 1F nm3 THEN PRINT" 屋 ": GBDTU BOO 760 CURSDR15』1 さ *PRINTE2。]" " 
240 1F =4 THEN FRINT" 層 ":GHTO 2700 7 ヨ O GOT ロ 2oo 
250 IF a=5 THEN FRINT" 司 "* BODTH 115O BOO_REM = ニニ = 2" イ ケー スズ = ニ = 
260 IF as6 THEN FRINT" 層 ":GHTO 155O 10 PRINT " 昌 三 時 
270 IF =7 THEN PRTNT" 屋 "*BDTO SOOO B15 PRINT" atE = どい 
2 コ 0 IF a= THEN PRINT" 屋 ":END 2O0 FRINT" | 1 
29O BDTD 200 B25 PRINT" | | " 
ささ OO _REM = ニ ーー オオ キサ ヒ カ イワ ニニ = ksPRTNT"E 蜂 民 恨 さ O_ FRINT" | | " 
さ 10 PRINT" | に ix B35 FRTINT" | 1 " 
320 FRINT" | 2 税 上 ! 40 FRINT" | 1" 
さ 33 さ 0 FRINT" | 1] | 具 B5O PRINT" | | | な 
340 PRINT" | 2 提 BaO FRINT" | | | 1" 
350 PRINT" | 1] 1 1 B7O_ PRINT" 1| に 本 計 
360 FRINT" | 「 陣 肥 BBO FRINT" | 還 9 
さ ZO PRINT" | | SN | P B9O_ FRINT" | ド 1 隊 
3BO PRINT" | 雇 io | 有 900 PRINT" 賠 ECS は HISPTTCeryirSh 
| Ll 「 WW 910 BET 日 :TF 日 ="5" THEN BDT ロ 9 さ O 
| 1 | | 『 920 BTO 910 
| 員 提 100 | 胸 930 CURSDR15。12EPRTNTE2。] リ 人 " 
"中 940 CURSHR15, 1 さ : PRTNTL2。]"" 
950 CURSDRO, 15 
960 本 [="O00000" 
97O FDR 1=1T ロ 18 
4BO PRINT" 1 3 98O_ FOR J=1 TO 230kNEXT J 
490 PRINT" | 皮 990 CURSDR6+T 。17: PRTNT[ ミ 。]" 較 " 
OO PRINT" | 9 1000 GOSUH さ 2 アプ O 
5Q5 FRINT" | 2 101O BDSUE さ 240 
51O FRINT" | 紀 1020 NEXT I 
1 FRINT" | 1 103O FUR 1=1T ロ 18 
520 PRINT" | | 5 104Q FUR J=1 TH 23OsNEXT J 
2 PRINT" | | | 衣 ま 105O CURSDR6+ 1 。16: PRTNT[ さ 。]" 圧 " 
530 PRINT" | 王府 106O BUSUB さ 27O 
54O PRINT" | 琴 隊 3 107O_BDSUE さ 240 
545 PRINT" | も 1\ 108O NEXT r 
55O FRINT" R 109O FDR =1 TH 15OsNEXT J 
560 GET 日 本 : TF 日 和 ま ="S" THEN BHTOU SBO 1100 CURSUR15。12*PRINT[2。]" " 
70 GOT ロ 56O 


11O CURSHR1 紀 。 13:PRINTE2。]! 『 
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1120 
115O 
1 15 
1160 
1 165 
117Q 
11 ヨ 0 
1190 
1200 
1210 
1220 
1230 
1240 
125O 
1260 
12 フ 7O 
12BO 
1290 
1310 
1320 
1330 
13409 
135O 
1360 
137O 
1380 
139O 
1400 
141Q 
1420 
143Q 
1440 
145O 
1469 の 
147O 
148O 
1490 
15QO 
1519 
152O 
1 紀 さ り 
1540 
1 きり 
156O 
に 
1570 
1575 
15 ヨ 0 
159O 
1600 
161O 
1620 
163O 
164O 
165O 
1660 
1670 
16 ヨ 0 
169O 
1700 
1710 
1720 
17 さ Q 
17409 
175O 
1760 
1770 
178O 
179Q 
180O 
181O 
1820 
1830 
1 ヨ 40 
1850 
1855 
1860 
186 
1864 
1866 
1870 
18BO 
190 
1900 
1910 
1920 


GT 2OO 

REM ニー ニニ = グ ヤキ ニニ = IPRINT"B 昌 時 司 隔 #" 
PRINT" 4 
FRINT" | 
FRINT" | 
FRTINT" [ 
FRTINT" | 
FRTINT" | 
FRTINT" | 
FRINT" 1| 
FRINT" | 
PRINT" 

FRINT" 

PRTINT" 1 

BET B ま : IF 昌和 ="G" THEN GOTO 120 
BDTD 126Q 

CURSUR15。12EPRINTES ュ ]" 引 " 
CURSOUR15』13IFRTINTES ェ ]" 更 " 

TI まま ="OOOOO0O" 

FR =1 TO フ 
EURSHR15ー- エ 』17I PRINTE さ 。]" 菩 " 
CURSHR16+1T。17:FRINTE さ 。]" 較 " 

FUR 』=1 TH 100 ENEXT J 

GUHSUB さ アウ 

BDSUE3240 

NEXT 1 

FR 1!=1 TOB 
CURSHR15ー1。17sFRINTE 上 3。]" 較 " 
CURSUR7+INT(T/) 。16IFRINTE』]" 較 " 
CURSHR15+ エ 。17EPRINTE さ 。]" 還 " 
CURSURE ミ ーTNT (1/2) 。16:FRINT[5。]" 較 " 


FR J=1 TO SO ENEXT J 
BUSUE3S70 

GUHSUB さ 40 

NEXT 1 

FDR =1 TU SO ENEXT J 


CURGSHR12,16:FRINTE き 。] "| リ " 
CURSHR19。16:PRTNTE さ 。]" " 
FUR 』=1 TO SO INEXT J 


BET に ま :TF じ ま も ="E" THEN CURSURO。 15: BODT ロ 2OO 


GOTO 1390 
GnTO 2oo 

REM ニニ = つ エ ヤキ ニニ ニ 
FRTNT " 還 時 !" 
FRTNT" 
PRINT" 
FRTNT" 
FRTNT" 
FRTNT" 
PRINT" 
PRTNT" 
FRTNT" 
FRTNT" 
FRINT" 
FRTNT" 
PRINT" FC の PC 
BET $:TF B*="S" THEN BDTO 1690 
GQT ロ 1870 

CURSDR15。 12:PRINTL2。]" 人" 
CURSOR15,13:PRINTL2。]"W" 
CURSDRO, 15 

TI*="OOO000" 

FUR 1=1T ロ 12 

FOR J=1 TO 140:NEXT J 
CURSDR9+T。17:PRINTL ス 。]" 較 " 
GOSUB327O 

GOSUB324O 

NEXT 1 

FOR エエ =1TO 12 


ョ 


FR J=1 TO 14OINEXT 可 
CURSUR9+T』16IPRTNTE 上 さ 。 ]" 較 " 
BUSUB32 フ 0 

BSUB3240 

NEXT I 

FOR エエ =1TO 12 

IF 1/2ーINT(T/2) 20 THEN BOTO 187Q 
CURSUR20。 ら 6: FRITNTE。]" 菩 ":FHR ゴ =1 
CEURSHR2O』6: PRINTE6。]" "EiFUR =1 
CURSUR2O,i PRINTE。]" 較 "=:FUR =1 
CURSDR2O』B:PRTNTE』]" "EiFUR コテ 1 


CURSHR9+1 。 15: FRINT[ さ 。]" 画 " 
BUSUBE327O 

GOUSUB3S49 

NEXT 1 

FOR 1=1TOU 1 

IF 1/ーINT(T/S) 2O_ THEN BTD 1930 
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TH 6Q0INEXT J 
TO 6OINEXT J 
TH 6OINEXT J 
TO 6okNEXT J 


CURSHR2O ょ 6: FRTNTE。]" 


TU 6OENEXT J 


CURSHRSO ょ 6: PRTNTT6。]" "IFUR =1 TH 60iNEXT J 


CURGOR2O。 昌 : FRINTE。]" 園 "FOR =1 TH 6OINEXT 


CURSDRSO。 Bi PRINTE5』]" "ksFHR ロコ =1 TH 60INEXT J 


CURSHR9+T エ 。14:FRINTE さ 。]" 略 " 
BUSUB3 人 70 

GSUB さ 240 

NEXT 1I 

FUR J=1 TOU 120INEXT J 
CURSHR15』125FRINTES。]" リ 
CURSnR15。 1 さ 5PRINTE2。]" リ 
BHTO 200 


コ 
ll 
に 4 
出 
晶 
出 
山 
日 
に | 
3 
昌 
中 


PRTNT "本 時 還 必 9" 
PRINT" 
FRINT" 1 
FRINT" | 
FRINT" | 
PRINT" | 
PRINT" | 
FRINT" | 
| 
| 
| 
I 


0 雪 宮 に 
| 
I 
| 
| " 
| 
| 


FRINT" 
FRINT" 
FRINT" 
FRINT" 
FRINT" 
BET 日 ま : ITF 日 ま ="" THEN BHTO 2S16O 

GTO 2140 

CURSDR15。1SiPRTINTES。] 

CURSUR15。 13:FRINTES。]" " 

CURSDRO。 15 

TI も ="O00000" 

BUDSUE さ 240 

BUSUB 32 フ 0 

FOR エ =1TO 12 

FOR J=1 TO 120INEXT J 
CURSDR9+i 。175 PRTNTE さ 。]" 較 " 

BUSUEB さ 2 フウ 

BUSUB さ 24O 

NEXT Ii 

FUR 1!=1TO 12 

FOR J=1 TO 1205NEXT 

CURSUR ワ + エ 。16:PRTNT[ さ 。]" 略 " 

BUSUE さ 2 アワ 

BDSUBE324O 

NEXT 1 

FUR 1=1TO 12 

FOUR J=1 TU 12ONEXT J 
CURSUR9+ 1 』 15:FRTNTE さ 。]" 導 " 

BHSUB ミ 2 アァ 0 

BDSUB324O 

NEXT 1 

FOR 1=1 TO 2 
CURSHR2S1+1。155:FRTNTE さ 。]" 菩 " 

FUR =1 TO 15ONEXT J 

GUSUE ミ 270 

BUHSUE3S40 

NEXT 1 

FHR 』J=1 TQ 15QkNEXT J 
CURSHR2 さ 。 16* PRTNT[ ミ 。]" 蘭 " 

BUSUE327O 

GOHSUB う 49 

FOUR =1 TO ア 
CURSUR2S+1。17:FRINT[ う 。]" 甘 " 

FUHR =1 TD 15ONEXT J 

NEXT 1 

FR 1I=1 TO B 
CURSURSS+ エ 。 17kFRTNT[ さ 。]" 計 " 

CURSUR2 ミ ーINT(T/S) 。14FPRTINTE』]" " 
BSUE ジア の 

BSUB 34O 

CURSHR19。14:PFRINT" " 

NEXT I 

BET に ま :TF ="E" THEN CURSDRO。 1 呈 : BHT ロ 
GTO SSQO 
BOTU 2OO 
PRTINT" 
PRTINT" 
PRTINT" 
PRINT" 
PRINT" 
FRINT" 
FRINT" 
FRINT" 
PRINT" 
PRINT" 


TSN 紀 


200 


28OO_ PRTNT" 
2 ヨ 05 FRINT" 
2B1O0 _ PRINT" 
215 FRINT" 
282O PRINT" 
2B25 PRINT" 
2830 PRINT" 
2 ヨ 40 FRINT" 
2B5O_ PRINT" 
2860_ PRINT" 
287O PRTINT" 
2880 FRINT" 
2B90 FRINT" ピー 
2900 BET H$:TIF HB も ="S" THEN GHTO 29SO 
291O BDTD 2200 
2920 CEURSDR14 ょ 17EPRINTES、] "人 、" 
2930 CURSHR14。1 ヨ EPRINTE2。]"W" 
2940 T[ 和 ま = ニ "OOOOOO" 
295O FOR エ =1TO 12 
2960 FOR J=1 TU 14OINEXT J 
2970 CURSHR ヨ +1 , 22:PRINT[ さ 。]" 較 " 
2980 GUSUB さ さ 70 
2990 GOSUB3240 
3000 NEXT エ 
3019 FOR エ =1TO 12 
さ O2O FDR J=1 TO 14OINEXT J 
さ 0 さ O CURSOUR ヨ + エ 。21:FRTNTE さ 。]" 国 " 
3040 BUSUE さ さ フ 0 
さ 05O_BUSUB う 240 

NEXT エ 


さ 070 
さ OBO 
さ 09O 
3100 
きま 
312O 
さ 1309 
さき 140 
さ 150 
さき 16O 
さ 17Q 
きる 18O 
さ 190 
さ 3200 
3210 
2 さ O 
324O 
う 25O 
さ 260 
KMPA) 
320 
3290 
さ 300 
さき 10 
3370 
ささ OO 
さ 390 
さき 400 
3410 


FOUR 1=1TOH 12 

FUR =1 TH 140INEXT 』 
CURSUR ヨ + 1 、2OEFRINT[ う 3。]" 較 " 
BSUE3 さ 70 

BUSUB3240 

NEXT 1 

FOR 1=1TH 12 

FHR J=1 TH 14OINEX 征 J 
CURSOR ヨ + 1 。 19: PRINTE さ 。] " 菩 " 
BUSUB さ さ プ フウ 

GOSUB3 全 40 

NEXT 1 

FR J=1 TU 120NEXT J 
CURSHR14』17:FRINTES。]" 
CEURSOR14』18kFRINTES。]"  " 
GOTO 2QO 

T=VaL (T エ まま ) 
CURSDR2 フ 7』 2 PRTINT "ET の Ws Ti 7 に に ョ ウリ 
RETURN 

SET 27。25。 さ SET さら 6。2』 さ 
SET 29.24。 さ る: GET さ 4。24。 さ 
RESET 27,2 ロ iRESET さ 6』25 
RESET 29.24:RESET 34。2 全 
RETURN 

SET 24』 う 6。 さ SET さ 5 ょ 36』 る 
SET 26。35』。 さ : SET ささ 。 さ 5』 さ 
RESET 24。 さ 6: RESET さ 呈 。 さ 6 
RESET 26。 さ 5 RESET ささ 。 さ 5 
RETURN 


よ お の REM- = テニ ニニ テニ ニー ニニ ニニ ニー ニー ニー ニニ デニ ーーー 


2O0_ RENM ニー= カ " 2 ジュウ フ " ロ 2" う ム ニニ = 
30 REM == (77 ヨウ コウ ト ") = ニ = 
40 RENM == 19 ヨ 3.4.2 ア に 
po- 和 E 准 ビデ K。. YaBISAMA ニニ 
ら 60_REM ニー ニニ ニー ニー ニー ニー ニー ニー ニー ニー ニニ ニー ニー 
BO PRINT" 屋 " 

0 GUSUE SQOO 

10O BET 倫 計 


110 IF 人 Q 和 ま ="1" THEN BUT ロ SQOQO 

120 IF ま ="2" THEN BHTH 600 

130 IF 介 生 =" さ " THEN BHTH 100O 

140 IF 内 生 ="4" THEN GOTH 1200 

150 ITF まま ="5" THEN BOTH 15QQ 

160 IF 人 ま ="6" THEN BOT 16QO 

170 TF 谷村 =" フ 7" THEN BUDTD 170O 

18O IF 人 ま $="B" THEN GT 1 ヨ O00 

19O 1F 内 まま = リウ" THEN BOTD 190O 

200 IF 第 =" 昌 " THEN BOTO SOOQO 

210 IF 人 Q ま ="E" THEN BODSUB6000 

220 TIF 人 ="M" THEN GOSUB6100 

300 BHTD100 

500 CURSHRSO』 7 PRINT 上 6。] CEHR* ま (103) 
510 GOTO 109 

600 CURSDR2O。75PRINT " " 

602 FUR エ =1 TO 5OO ENEXT 5i 

610 CURSHR さら 6。19:PRINTE6。] CHR ま (10 さ ) 
620 FOR ! 了 =1 TO BOO kNEXT 1 

630 FDR エ =1 TO 7 

640 CURSOR さ 6。20-TsPRINT" " 
650_CURSHR さら 6』19-TiFRINTE6』]CHR ま (10 さ ) 
る 660 FOUR J=1THBO INEXT J 

670_ NEXT 1 

680_ FDR 1=1 TH 1OOOINEXT 1 エ # 

ら 670 FOR 1 エ = ア TO 1 STEF -1 

700_CURSDR さ 6』19-TkFRINT" 

フ 10 CURSHR さ 6。』20-IiPRINTE6。 ]CHR ま (10 う ) 
72O FR コ =1TUBO :NEXT J 

739 NEXT エ 

740 CURSDR 36。19iPRTINT" " 

00 BOTO 100 

1O0O FOR エ =1 TO 1 ミ 

1010 CURSUR4』2 の ーT iFPRINTL ら 6。]CHR ま (10 さ ) 
1020 FOR J=1 TU BO FNEXT 
1030 CURSUR4。20-TEFRINT" " 

104O_NEXT 1 


105G 
1060 
1Q7QO 
108O 
1090 
1100 
1110 
112O 
113O 
1140 
115O 
1190 
120O 
1810 
1220 
123O 
1240 
1S5O 
1260 
1270 
12 ヨ 0 
1290 
な ) 
13QO 
150Q 
1510 
152O 


1530 


1540 
15545 
155O 
1560 
157Q 
150 
1590 
16Q00 
161O 
1620 
1630 
1640 
1645 
165O 
166 〇 
1670 
168O 
1690 
17QO 


FHR !=1 TO 32 
CURSHR4+ エ 』7: PRINTE6』]CHR ま (103) 
FOR J=1 TH ヨ 0 kNEXT J 
EURSDR4+T。7kPRINT" " 

NEXT 1 

FUR 1=12TD 1 STEP --1 

CURSOUR さら 6。』19ーTsFRINT" " 

CURSHR さら 6 ょ GOーTIPRTNTE6。]EHR ま (10 さ ) 
FOR J=1TOH ヨ BO NEXT J 

NEXT Tr 

CURSDR さ 6』19:PRINT" " 

BHT 1Q9 

FHR 1=1 TH 16 
CURSUR4+ エ 。 SO0ーTEPFRTNTE6』]CHR ま (10) 
FHR ゴ =1 TH 10OkNEXT 了 
CURSUR4+ エ ュ 0OーTEPRTINT" " 

NEXT エ 

FDR =1 TG 15 
CURSUR19+ エ 。 ミ +TsFRTINT" " 
CURSHRSQ+ エ 4+TIPRTNTE6。]EHR ま ( 10) 
FOR J=1 TH 100INEXT 

NEXT 1 

CURSDR35。19:FRINT" " 

GOTO 100 


了 日 1 や EE ビエ は 3 
F=SER (コマ ネス マー エ % エ ) 

SET 40-1 , さ 3 ヨーF 

NEXT 1I 

SET 40』5 

FUR 1=1 TO 32 
F=BOR ( さ 2 ネ さ 2ーT ネ 1 ) 

ET 40+ 1 。 さ ロー 


= の 5 TO 3 STEP_- ュ 1 
F=SOR ( さ マ ネ ラ マー1 1 ) 
SET 40-T、 ロ 5ー ド 
NEXT Ii 
SET 40。 2 
FOUR !=1 TU 2Z 
P=SDR ( さ 2* ラ 2ー エ *%1) 
SET 40+T 。 呈 ロー ビ 
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171O CURSDR 2O,2sPRINT[6。]CHR ま (10 さ る) 
1750 GT 100 

18OO REIM| = ニニ = テニ 

181O CURSOR 4』19IPRINTE6。]CHR ま (10 さ ) 
185O GT 100 

190O REM = ニニ ニニ 

1910 CURSHR 20。11*PRINTE6。 1CHR ま (10 さ ) 
195O0 GT 100 

2000 REM = ニニ = ヒサ ^" シ ニニ = 

2010 GHSUB4000 

2200 GET B$ 

2210 IF BB まま ="1" THEN GUTD SSOO 
2220 IF 昌和 $="2 つ " THEN GUSUB4QOQs GHTO 2700 
22 さ O 1F 昌和 ま =" さ " THEN GUHSUB4OOO: BHTO さ OOO 
2240 IF HB* ま ="B" THEN GT 65OO 
225O0 IF E* ま ="Y" THEN BOTH BO 
2300 BOTQ2200 

2500_REM== ニ = 

2510 FR =1 TO 11 

2520 SET 0。12+1。2 

2530_ NEXT Ii 

254Q FOR エ =1 TO 

255O SET 1。1 さ + エ 。2 

256O NEXT エ 

2579 FR ii=1 T ロ ア 

25BO SET 2。14+1。2 

2590_ NEXT 1 

2592 FUR 1=1 TH さ 

2594 SET さ 。16+1。2 

2596 NEXT 1i 

259 ビ =O 

26OO FOR =1 TH 38 

2603 = ビィ . ささ ささ 4 

2605 FOR J=1 TH 11 

2610 SET さ +I。INT(14+ ゴ + ビ ) 』 ら 
2615 NEXT J 

2620 IF エ =1 紀 THEN BUSUB 5S5OO 
2630 NEXT エ 

26③5 FUR エ = さ 9 TH 62 

2640 = ビ +. ささ ささ 4 

2645 FDR J=1 TO B 

2650 SET さ +T エ 』INT(1 フ + ォ ゴ + ピ ) 。 ら 
2655 NEXT J 

2660 NEXT 1 

2662 FOUR 1=1TOD さ 

2664 FOUR J=1 TO 7 

2666 SET 655+1 。3B+J。 ら 6 

266 NEXT J 

267O_NEXT 1 

2672 FOR T=1TO さ 

2674 FUR J=1 TO 6 

2676 SET 6 ヨロ + 1 。 さ 9+J ゴ 。 ら 6 

267B NEXT J 

2680 NEXT 1 

2690 GUTH 2200 

2700 REM === 

271O FOR I=O TO Z ア 

2720 SET O』O+T。2 

273O_NEXT Ir 

2735 FOR エ 了 =O TO 2 

2740 FOR J=O TH 7 

2750 SET 1+I,O+J。2 

2760 NEXT J 

2765 NEXT 1 

2770 FOR 1=O TO 6 

27 ヨ 0 SET 4。0+I。2 

279O_NEXT Ir 

2792 FOR IT=O TO 6 

2794 SET 5』O+I。2 

2796 NEXT エ 

2BO2 FDR 1=O TH 5 

2H04 SET 6』0+1。』2 

2806 NEXT 

2812 FOR 1=O TH 4 

2814 SET 7。O+I。2 

2816 NEXT Ii 

2822 FDR 1 エ =O TO ロ さ 

2 ヨ 24 SET 日 。 の + エ 。 ュ 2 

2826 MEXT エ i 

2832 FOR 1=O TO 1 

28 さ 4 SET 9。』0+1I。2 

2836 NEXT I 

2B3B SET 1』 ワ 96:SET 2』9 ょ 6:SET ご 10,6 
2 ヨ 840 FR エ =1 TH さ 3 

2842 SET さ 。』B+T。 ら 6 

2844 NEXT 1 
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2846 
284 晶 
SB5O 
2 ロコ 2 
2854 
っ きら 
2858 
2 コロ 6Q 
2862 
2 日 64 
2866 
2 日 
2 ロフ 7O 
2 日 プス 
274 
2 ア 6 
2878 
2B80 
28BS 
28 ヨ 4 
2BB6 
に に 】 
289O 
2 ヨ 92 
2920 
2924 
2926 
2930 
2932 
29 さ 4 
2 る 9 さら 
293 フ Z 
29 さ 3 
293 
2940 
2941 
2942 
2946 
294B 
295O 
2 っ 951 
2952 
2954 
2956 
2958 
2960 
2962 
2964 
299O 
さき OOQO 
さき OO2 
さき 004 
3010 
さ 020 
3030 
さき 04O 
305O 
さ Q6O 
き O7O 
さき OO 
307O 
さ 100 
さ 105 
3110 
さ 1 1 王 
さ 120 
さ 1 さ O 
さ 140 
さ 1 45 
315O 
さ 155 
3160 
さ 170 
さ 18O 
さ 190 
さ 200 
さ 21O 
さ 22O 
さ 230 
さ 3240 
さき 2S5O 
さき 260 
さき 270 
さき 2BO 
さき 500 
4O00O 


FHR IT=1 TO 4 

SET 人 4』 日 せ エ 。 ら 

NEXT 1 

FOR エ =1 TO 品 

SET 日 + エ 。6 

NEXT 1 

FUR 1!=1 TH プア 

SET 6』 ア + ォ エ 。6 - 
NEXT エ 

FR 1!=1 TO 

SET、 7』7+ エ 。6 

NEXT 1 

FOUR 1=1 TO 11 

SET 日 』+ 1 。 ら 

NEXT 1 

FR エ =1 TO 1 る 

SET 9。』4+ エ 。 ら 6 

NEXT 1 

FOR !=1 TH 16 

GET 10。2+ エ 。6 

NEXT エ 

FR =1 TO 2O 

SET 11。ー1+ エ ュ ら 6 
NEXT 1 

じ =O s D=O 

FR I=1 TO 30 
= ビ +1 

IF 1I>26 THEN D=D-1 
FR J=O TO 19+D 
SET 1 1+ エ ょ ビ +O+J』 ら 6 
NEXT 

IF エ =12 THEN GBSUB 55OO 
NEXT 1 

E=O 

FUR 1=1 TO 
E=E+1 

FUR J=1 TH 7 

SET 41+1 。29+J ゴ +E ュ 6 
NEXT J 

NEXT ri 

SET 42。 さ 日,6: SET 42。 さ 。6: SET4 さ 。 さ 。 ら 6 
F=O 

FUR =1 TO 6 
F=F+1 

FUR J=1 TH 7ーF 
SET 50+[。 さ + ゴ +F』 ら 6 
NEXT J 

NEXT 1 

GTO 2200 

RENM = ニニ テニ 

SET 1 は 。 さ 。』 ら 6: SET 19。 ょ さ ょ 6 
SET 29。 さ 。 6 SET さ O。 さ 。 ら 6 
FUR 1=1 TH 1 さ 3 

SET 17+1I。0。2 
NEXT I 

FR 1=1 TO 11 

SET 18B+ エ 1。1。2 

NEXT エ 

FOUR =1 TO ア 

SET 20+1I。2。2 

NEXT 『 

SET 24。 さ 2 

5=O 

FR 1=1 TO 36 
=8+ 。 ささ ささ 4 

FOR J=1 TO 12 

SET TINT(+1 ピ +J ゴ ) 。 さ + エ 。 ら 6 
NEXT J 

IF エ =2O THEN GOSUB 55OO 
NEXT 1 

F=O 

FOUR 1=1 TH 2 

FOUR J=1 TO 11 

SET 30+J。 さ 9+1 。 ら 6 
NEXT J 

NEXT 1 

FR =1 TO さ 

FDR J=1 TO 1O 

SET さ 1+ ゴ 』41+ エ 。 ら 
NEXT J 

NEXT + 

FUR J=1 TO 

GET さ 2+ ゴ 』4 オ 1+I。 ら 6 
NEXT J 

GT 2200 

REM = ニニ = ニー ヒサ せ ^ > ニニ テー 


PRTNT "時 


PRINTLS ュ ] 人 
PRINTL2。] " MURActyWe お っ 
PRINT" 硬 「 語 
PRTNT" 園 本 " 
PRINT" | 四 

PRTNT" " 

PRINT" 還 " 

PRTNT" | u 

PRINT" 還 " 

PRINT" 「 軒 " 
PRINT" 「| 男 " 
PRINT" 画 較 


HiMETEEHEI6HBD 
RETURN 3 
RE ニニ ー フウ ケイ ニー デー 


CURSORO 』 22 
PRTNTE4。]" ドコ 人 
PRINTE[4。]'" 人 。 本 人 人 細 際 を 


PRTNT[ 4。]" 軍隊 ホ 、 hh 4 
PRTNT[4。] 「 会 、 
PRTNT[4。] 「 了 、 開 回国 半 記 ス スス 44 と 
SH 
CURSDR さ さ 。 2OE PRTNT[ 2 。] 「 。 村 還 隊 陣 NN、「 

CURSUR さ さ 。21kFRINTEZ、]" 上 析 工 蘭 " 

CURSDR さ さ ,221 PRTNT[7。] "| 議 較 呈 較 " 

RETURN 

BET C ま ま # IF 上 和 ま ="C" THEN RETURN 

BOTO SSQOO 

CURSHR2。1:PRINT" ヒ " 

CURSHR2』 2 PRINT "お " 

CURSHR2』 さ : PRINT "BB 

RETURN 

CURSDR37。1: PRINT" ニ リ 

CURSUR さ ア 』 さ 5 PRINT "も " 


RETURN 

REM === カケ " === ニ iPRINT" 司 ! 
GOSUB 6900 

GET B$ 


IF B*$="1" THEN BOTO 6600 
IF B* ま ="2" THEN GOTO 6700 
IF 昌和 ま =" さ " THEN BHTO 6BOO 
IF B ま ="B" THEN GOTO 0 
IF B ま ="Y" THEN GOTH 2O000 
IF 日 和 ま ="N" THEN 6500 
GDTO 6510 
RE ビーゴ 1 
CURSHR 2』10:PRINT[6。 ]CHR ま (103) 
GET C$: IF C ま ="C" THEN GHTO 6610 
BUT066O4 
=O 
FOR 1=1 TH 72 
ビニ = ビ + 。 ささ さき 4 
SET 5+1』INT(21+ オ に) 。6 
NEXT I 
BOTH 6S10 
REM = デニ 
CURSOR 4:PRINTE6。 JCHR$ も (103) 
GET C$: ITF C ま ="C" THEN GOTO 6710 
BODT ロ 67O4 
テ 0 
FUR =1 TH 36 
ビ = ビ +1 
SET 1B+T。INT (9+ ビ ) 。6 
NEXT 1 
BHTH 6510 
REM = ニニ ニテ 
CURSOR 16。1:FRINTE6』]CHR ま (10③) 
GET Ci ITF C ま ="C" THEN GTO 6B1O 
GOTD6BO4 
C=0 
FDR 『=1 TO 41 
C= ビ +。 うさ ささ 人 4 
SET TINT (うう 3+) 。4+ エ 。 ら 6 
NEXT i 
BOTO 651O 
REM ニー ニニ スズ イチョウ ホウ ニモ ニニ 
CURSRO。 2 さ 
| 時 人 EE 
FR 1i=1 TH 7 
CURSOR 2O。16+TkFPRINTE4。]" 較 " ぶ 
NEXT 1 
RETURN 


子供 が 待ち こ が れ る 授業 2 クダ 


で で 特に 面白 ひつ た 。 
今度 は LOGO に 関す る 
特別 号 を 出し て は いか 
が 

餅 田 茂 (II) 神 奈川 県 


私 は 1 日 の こら 時 間 、X| 


・ と つき あつ て いま す 。 近々 
BASIC の お 絵 書 プロ グラ 
ム が 出来 上 り ま す 。 あ と は 
中 間 色 ベイ ント ルー チン だ 
け で す 。 み な さん が ん ば ぱつ 
て ぐだ さい 。 

宇佐 見 祥 治 (26) 愛 知 県 


編集 部 か ら 読者 の 皆さん へ 
お 便り を お 礎 せ くださ い 。 内 容 は どん 
な も の で も か まい ませ ん 。 言 いだい 放題 、 
コー ニー ク な 内容 の も の を お 待ち し て いま す 。 
あわ せ て イラ スト も 大 募集 。STUDIO 
MZ ま で どん どん お 送り ぐだ さい 。 
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Oh / MZ を 読み は じ め て , は や 1 年, そし 
て 私 の 愛 機 2000 も ボチボチ 1 年 , な の に , 私 
の 頭 は . カラ ッ ポ , これ ぞ ク リー ン 設 計 ノ 
これ か ら も 2000 の 記事 を よろ し 〈 く , お 願い し 
ます 。 秋山 修一 (25) 茨城 県 
〇 こち ら も , 夏休み が 終わ っ て し まっ て , 頭 

は クリ ー ン 。 机 の 上 も クリ ー ン に な れ ば い 

い ぃ い の だ けど 。 
MZ-700 の 関連 記事 を ヨロ シク / 貴 誌 は 脂 
肪 ぶ と り し な いで 下さ い ネ , 電車 の 中 で 読む 
の に あん まり 重たい と 肩 が こる ん で す 。 

吉田 祥子 (l6) 大 阪 府 

今月 号 ち ょ っ と 太っ だ た けど, 肩 が こっ だ た か 

な ーー? それ と も 腕 が 太っ た か な ーー ? 


全 ン !? 何だ が これ は / LOGO だ / ロゴ 
だ / ろ ざ だ / や っ だ た ーLOGO だ 当 ! う 
と う MZ の 特徴 が 生か きれ る と き が きた 
坂本 繁 海 (15) 東京 都 
の LOGO に 関す る 記事 は , 今後 と も 詳し く 掲 
載 し て いき ます 。 
金 前 に , LOGO に つい て , 雑誌 で も ちょ っ と 読 
ん だ こと が あっ て , LOGO は ター トル グラ フ 
ィ ッ ク だ け と 思っ て い だ け ど , それ だ け じ ゃ 
な いと わか っ て よかっ た 。 
戸崎 宗 (17) 愛知 県 
LO0GO で の グラ フィ ッ ク , いい で すね / 
700 で も あん な の が で きれ ば 。〈 く そっ / あー 
PCG が ほし いっ / グ 園 浩二 (I6) 大 阪 府 


全 Oh / MZ は Program づ くり に 反映 さき せる た 
め の 貴 重 な 資料 し な り ま す の で , ご 協力 くだ 
る い 。 石森 幸弘 (26) 埼玉 県 
心 ん ? どっ か で 聞い た よう な , 見 た よう な 
セリ フ 。 貴重 な 資料 づく り に 協力 し ます 。 
ボク は みじめ で す 。 X 1 用 シス テム ソフ ト 
ウェ アコ ン バ ー タ が 気に入っ て , お 店 に 買い 
に 行っ た の で す が , 名 前 を 忘れ て し まっ た の 
で 店 員 き ほん に こう こう こう いう ソフ ト し と 言っ 
だ た だら, その 人 は 自信 あり げに ちがう も の を も 
っ て 来 て 買っ て し まい まし た 。 返品 は 認め て 
〈 く れ ま せん 。 だ か ら 国 を 下さ い 。 
西 昭彦 (I6) 三重 県 
の 商品 名 は 確実 に 覚え を よう よね 。 何 千 円 か で 
ソフ ト は 買え ます が , ソフ ト で 何 千 円 か は 
買え ませ ん 。 
全 「 コ ンピュータ 」 と いう と ,。 ゲー ム だ け に 
な が され て し まう 僕 な の で す が , Oh / MZ を 
読ん で いる と , も っ と 深い 内 容 に つい て 知る 
こと が で き , 一 時 の 博士 に な れ た よう な 気分 
に な り ま す 。 森崎 上 恵 次 (15) 岐阜 県 
ーー 時 の 博士 で 終わ ら せ な いで , 知識 を 著 積 
も もそ 。 キラ テー イ 人 に な っ で ね ね,/ 


まだ と どの パソ コン を 買う の か も 決め て いな 
い の に , Oh / MZ を 買っ て いる 。 な ぜ だ ろう 
と 思い な が ら , 今月 号 も 買っ た 。 

内 藤 昌志 (I4) 北海 道 
やっぱり, せっ か く 亀 強し た 知識 で すか ら , 

MZ を 買っ て 役立て た いね 。 

金 MZ-2000 の ディ スプ レイ は 非常 に 傷 が つき 
や すく ほこ り を 布 で ふき と る と 表面 が ざし ぎ ざ 
し に な り ま す 。 そ こ で レ ュ ー ド クリ ー ナ ー を 
使う と 、 い つま で も 新品 の 状態 が 保 て ま す 。 
イタ リア 製 の が 良 〈, 日 本 製 の も の は 固 す ぎ 
て あま り 良 《 く ありま せん 。 

根岸 正秀 (30) 石川 県 
つん 一 な る ほど 。 イタリア製 で すか …… ら 


例 LOGO / LOGO / LOGO は すばらし い 
ー 僕 , ぜったい に 買っ ちゃ いま ー す 。 マ テ ヨ ? 
カ 。 金 が ………… (た 外 ) どう し よう 。 

高瀬 雅敏 (I6) 宮 厳 県 
多 LOGO の 記事 は と て も 面白 か っ た 。 毎週 載 
せ て 〈 く だ る さい 。 高石 雅 克 (29) 奈良 市 
金 LOGO に 興味 も や も ち は じ め た 。 連載 望む 。 
8 月 号 は best / 根本 郁夫 (!5) 茨城 県 


LOGO は すご い 反 響 で し た 。 本 誌 で は , 皆 
さん の 期待 に 答え る べく , 今後 も いい 記事 
を 掲載 し て いき ます 。 


た だ いま 四 人 麻雀 の デバ ッ ク 中 。 ウー, 入 
カミ ス が 多い 。 と いう わけ で 4 月 号 の 英文 タ 
イプ の プロ グラ ム を 使い 勉強 中 。 と て も 役 に 


立っ て いま す 。 竹内 広宣 (|7) 静岡 県 
の そう, そう いう ふう に 利用 し て も ら え ぇ たら 
お ね ぇ る ん は ほん と うに うれ し い …… 6 
全 バイ ク は お れ の 青春 だ ” と いう と カッ コ 
いい が 。 パ パソ コン は お れ の 青春 だ ” と いう と 

ネ ク ラ に 聞こ を える の は な ぜ だ ろう 。 
工藤 義勝 (22) 愛知 県 
べ 青 春の 一 時 的 な 情熱 だ け で 終わ ら せ な いよ 
うに , どなた 様 も くれ ぐれ もご 注意 《 だ きる 
紀 。 
ぼく は , X 1 大 好き 少年 で す 。 毎 月 の こ づ 
か い が た っ た の 千 円 。 半分 を Oh / MZ に つぎ 
こん で いる の に X 1 の ソフ ト が 少な い 。 なぜ 
だ / も うち ょ っ と XX 1 の ツク ント を ふやし て 
《 だ さい 。 砂川 敦志 (|4) 東京 都 
カモ セット テー プ だ っ た ら 500 円 で 何 本 か 買え 
る も ん ね 。 だ か ら 今 度 は 自分 で プログ ラム 
を 組ん で みよ う よ 。 
Oh / X1 と いう の は で な い の だ ろう か 。 を 
れ な ら X 1 の X 1 に よる X 1 の た め の ペ ー ジ 
が あっ て も いい と 思う 。 
石塚 孝幸 (l6) 奈良 県 
の 〇 だから, 今月 号 で す 。 


せっ か てく XX 1] を も っ て いる の に , 最近 病気 
で 使え な い 。 病気 に は 気 を つけ よう / と こ 
ろ で , X 1 の グラ フィ ッ ク ツ ー ル を は ほ ば 完成 。 
あと 少し 改良 を 加え て , 9 月 ご ろ 投 稿 し ます 。 
アー トク リエ イタ ー を 超え る か ? 
岩城 史生 (17) 北海 首 
早く 《 病 気 を 直し て , 投稿 し て ね 。 待 っ て る 
よみ 
オ イ , コラ / SHARP/ MZ-2200 な ん か 
出し や が っ て , MZ-2000 を 買っ た 者 の 身 に も 
な っ て みろ 。 オレ の 友達 な ん ヵ 半 狂乱 に な っ 
て いた ぞ 。 と いい つつ オレ は MZ-2200 を 買う 。 
これ で オレ の 友達 は 完全 に 発狂 する だ ろう 。 
シャ ー プ さん あり が と う 。 編集 部 さん , MZ- 
2200 の 特集 や っ て くだ さい 。 
今 給 表 桂 一 (15) 愛知 県 
の 〇 MZ-2000 も 2200 も 内 容 は ほとん ど 同 じ な ん 
だ か ら , お 友だち と 仲良 くし て ね 。 
多 私 は 中 二 の 女 の 子 で す 。 今 年 の 初め ご ろか 
ら パ ソコ ン に 興味 や も ち だ し , それ か ら 毎 月 
貴 誌 を 楽し く 読 ませ て も ら っ て ます 。 初心 者 
の 私 に は と て も わか りや すい で す 。 これから 
も が ん ば っ て ググ 山崎 愛 弓 (|3) 佐賀 県 
本 誌 に は 貴重 な 女の子 の 読者 。 も ち そ れ だ 
け で 載っ けち ゃ う も ん ね ー。 


$ 久 びさ の 山本 寛 氏 の 登場 感動 し まし た 。 


それ に し て も , LOGO の MZ 版 が 出る な ん て 
うれ し いで すね ー 。 そ の うち FORTH,C な ど 
いろ いろ と 出 て くる ん で し ょ う 。MZ の 未来 
は 明る い グ 片町 伊 久 夫 (I8) 長野 県 
を そう, Oh / MZ の 未来 も 明る い 1!? 
PC は きら い だ 。HC も きら い だ 。 IBM だ っ 
て いや だ 。 JR も すき で な い 。SMC も MB も 
ZX や APPLE も SC と か MBC, FACOM に M 
-5 に PASOPIA は 大 きら い / そこ で ば ぽく は 
MZ. ク 鴨 崇 俊 (|5) 神奈 川 県 
や 肉 は きら い だ 。 刺 身 ど っ て いや だ 。 に ん ビ じ 
ん も すき くく な い 。 そこ で 今晩 は 何 を 食べ よ 
うか な ー。 


る Uta, か に 会 い で きよ … 本 休 世 けさ 


NR こ ー 
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FROM READERS TO THE EDITOR 


面白 玉手 箱 ′ は 良い 。 で きれ ば 毎号 に … 
松野 到 (25) 神奈 川 県 
や 有田 隆也 る ん, 聞き まし た か , この 言葉 。 
原稿 を 毎月 待っ て いる の で す よ , 私 た ち も 。 
BASIC, マシ ン 語 , 次 に LOGO0。 お じき さん 
に は つい て いけ な い ヨ ー。 
牧山 登 (37) 大 阪 府 
つ そ ん な こと 言わ な いで 。 当 編集 部 の MZ お 
じき る ん は 頑張 っ て いる の で す よ 。 
人 MZ シス テム ソフ ト の 活用 法 /、 『 こ れ か 
ら フ ロッ ピー を 入手 し よう と する 方 へ ?, どう 
し て ぼく の 読み た い 記事 が わか っ た の ? 
小笠 原 康裕 (15) 愛知 県 
の を りゃ あな た 。 読 者 あっ て の Oh /MZ で す 
も の 。 と ころ で 参考 に な っ た か な ? 
毎月 18 日 は 残業 せ ず に 帰宅 。 ア ル 中 で な く 
Oh / MZ 中 …… ? 柴田 守 (37) 大 阪 府 
何ごと も ほど ほど が 長続き の コツ 。 
多 受 験 戦争 の 嵐 の 中 、 つい つい Oh / MZ に 手 
が の び , 問題 集 を ほう り だ し て し まう 。 罪 な 
雑誌 び ザ ノ 久保 満 (I7) 福井 県 
の 当 編集 部 は 罪 な 雑誌 作り を 目指 し て いま す 。 
が びー ん , な ん と テス ト で ※ メ 番 以内 に 入 
っ だら (どら むす こ な が ら ) 700 を 買っ て や る 
と 言わ れ た だ た 。 ゲ ダッ, テス ト は あし た だ / を 
ば に Oh / MZ が ある 。 勉強 と Oh / MZ, と ど 
っ ち を と る か 7? ひえ ぇ ー 手 が 勝手 に Oh/ M 
を と っ で し まっ た 。 ど 。 を みう し よう ーー ( 表 
紙 の せい だ , し か し 今月 号 の 表紙 は ええ )。 
清野 秀彦 (I3) 福島 県 
あー あ , や っ ぱ 旨 強 し た な ほう が 。 い か っ た 
ん で な いか い ? 
ある 総合 電気 店 で ,. ナイ コン 族 の ぼ ( は 
「 ベ ー ト ー ベ ン は いか が 」 を 打ち 込ん で いた 。 
する と す で 横 で , 小 3 で らい の お 子 様 (実は 
《 そ が き ) が 。「 マ マ 。 これ 買っ て 」 と MZ- 
731 を 指し た 。 する と その 子 の 親 は ……。 ぼく 
に は と て も つら い 1 コマ で し た 。MZ-700 は 
きら い だ 。 山本 大 正 (I4) 青森 県 
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ワー イ / ミッ ショ ン と アン ダー グラ ウン 
ド シ テ ィ を や っ た ぞ , MZ-2000 で あん な すご 
か こと で きだ ん や な / うれ し が か が / 

丹羽 基 輝 (|6) 静岡 県 
ハー ド 入 門 が 実に うれ し い 。 特 に, あま り 
わか ら な か っ だ CPU の 説明 が あっ た の は 良 
か っ た 。 松原 隆行 (16) 千葉 県 
使 今月 の ゲー ム 「 い ろ は 歌 の 謎 」. ノ ゲー ム 
も アイ デア し だ い ぃ だ な あと つく づく 思い ま 
し た 。 と て も る むずかしく,- お も し ろか っ た 。 

勝見 健一 (I5) 福井 県 
人 マシン ラン ゲー ジ の 活用 ” “素晴らしい 記 
事 で すね ノ 田 打 幸弘 (17) 滋賀 県 
イラ スト と コミ ッ ク が 少な い 。 も っ と 多く 
し た 方 が 見 や すい 。 太田 誠 (32) 愛知 県 
Z-80 機 械 語 へ の 誘い は と て も 役に立ち ます 。 
これ か ら も 続け て くだ さい 。 田 力 一 (23) 愛 知 県 


MZ-721、 ソ フト 8 本 付 67 年 12 月 | 
購入 ) 4 万 円 で 。 手渡 し 希望 。 ぼ 紙 
で 送 つ て くだ さい 。〒338 埼玉 県 清 
和 市 西堀 296-9 関 光紀 


松田 量子 の LP' 金色 の 
リボ ン 」 を 2000 円 以下 
で 買い ます 。 詳し こ は 
W〒 で 、 よ ろ し く 。 〒 
955 新潟 県 三条 市 西 大 
崎 県 営 住宅 A- 1 

本 間 則 光 
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掲載 ご 希望 の 方 は , 官製 ハガキ に 

項目 (売る ・ 求 む ……) を 明記 し て お 
申し 込み くだ さい 。 

ソ フト の 売買 , 交換 に つい て は , 
いっ さい 掲載 で きま せん 。 

. 欠 取り 引き に つい て は 当 編 集 部 で は 
責任 を 負い か ね ます 。 

例 応 募 者 多数 の 場合 , 掲載 で き な い 
場合 も あり ます 。 


了 呈 
728 ohiMZ 1983.10. 論 還 | 


娘 ぼく 売っ ちゃ いま す 。MZ-721 新 品 同様 。 Z-80A を 
な らし 終わ り バ リバ リ 絶 好調 。 6 万 円 で 売っ て い 
いか な !? W 和 まっ て る ぜ / ソフ ト も 付け ちゃ 
う ゼ ぜ / 〒928 石川 県 輪島 市 二 勢 町 6 一 30 
門前 徹 

廊 売 る / MZ-721 ( 新 同 ) キソ フト 1 本 。 
関連 図書 十 保証 書付 き 。 5 一 6 万 円 で ノ 
谷 08355 一 4 一 0749 田原 まで ん 

X1 新 同 (G-RAM 二 付属 品 十 関 係 書 付 ) を 19 万 円 
で 購入 2 ヶ月 前 。 送 料 負担 し ます 。 
〒177 . 練 馬 区 上 石神 井 1 一 697 伊藤 裕司 

支 新 同 X 1。 グラ フィ ッ ク RAM 十 ジョ イス ティ ッ ク 
2 個 付 、 20 万 円 び 。 ゲ ー ム ソフ ト , 数 本 有り 。W 
〒 待 つ 。〒358 埼玉 県 入間 市 上 谷田 1 一 3 一 3 一 304 
江幡 眞一 

支 売 る 。FP-1100 4 万 円 。PC-8001MKII を 8 万 円 。 
14inch グ リー ン CRT (Logitec) を 2 万 円 。 詳細 は 
W〒 に て 。 〒330 大 宮 市 三橋 2 一 84 青木 秀美 

支 PC-1211 を 1 万 円 で 。 〒447 愛知 県 青南 市 笹田 町 
4 一 69 杉浦 友幸 


その 他 。 


文 MZ-2000 (G-RAM 1, 2, 3 付 ) を 11 万 円 。 また 20 
イン チ RGB ディ スプ レイ (シャ ー プ 製 ) を 10 万 円 
で 。 〒572 大 阪 府 寝 屋 川 市 寿 町 2 一 28 
松岡 慶 明 

支 MZ-2000 を 買い ます 。 10 万 一 15 万 で お 願い し ます 。 
と に か く 〒 を / 〒321-02 栃木 県 王 生 町 な も ちゃ 
の まち 2 一 18 一 10 西城 正芳 

赤 MZ-80BF を 10 万 円 で 。 MZ-2000 プ 80B 用 イン ター 
フェ ー ス , ケー ブル を 3 万 円 で 。 両 方 な ら 14 万 円 
で (使用 2 年 以内 に 限る )。 〒276 千葉 県 八千代 市 
八千代 台南 2 一 13 一 5 和田 哲 義 

文 X1, 周辺 機器 を 買い ます 。 2000 文 字 対 応 の カラ 
ー デ ィ ス プレ イ も 買い ます 。 希望 価格 を 書い て W 
〒 で 。 気 長 に 待ち ます / 〒〒444-12 愛知 県 安城 市 
根 崎 町 西根 55 番 地 太田 誠 

廊 PC-1251 と CE-125 と で 2 万 円 。 

会 057 一 851 一 0367 久保 田 文雄 

支 買 いま す / MZ-2000 用 フロ ッ ピ ー, プリ ンタ 。 
詳細 は 応談 。〒584 大 阪 府 富 田林 市 清水 町 8 -529 
上 垣内 昌 己 


支 当方 、 MZ-731 キ ソフ ト 多 数 十 付 属 品 一 式 十 関連 図 
書 寺 グリ ー ン ディ スプ レイ (12M-13B) 。 貴方 ,MZ- 
2000, 80B で きれ ば G-RAM 待つ ハガキ ノ 
〒601 京都 市 南 区 唐橋 花園 町 62 大 填 岳史 


MZ の 愛好 者 の みな さん / 特に 700 を 可愛 い が っ 
て いる 人 , お 便り 下さ い 。 情報 交換 し まし ょ う 。 
〒486 春日 井 市 愛知 町 1, 清和 察 河合 義一 

娘 MZ-80B か X 1 の ユー ザー で 中 学生 の 人 , プロ グラ 
ム や 情報 を 交換 し まし ょ う 。 男女 問い ませ ん 。 お 
手紙 まっ て ます 。〒558 大 阪 市 住吉 区 長居 4 丁目 
1 番 B 一 80] 藤田 憲一 

廊 MZ-80 シ リー ズ の オー ナー の 方 , MZOC (MZ 
Owner's Club) を 結成 し ませ ん か 。 ツ フト ・ ハ ー 
ド を 問わ ず 情 報 交 換 を し まし ょ う / 遠方 の 方 も 
大 歓迎 / また 当会 で は , 会 員 証 , 会 誌 も 有料 で 
会 員 の 方 に 支給 する 子 定 で す 。 詳細 は , 往復 ハ が 
キ か TEL で 。MZ-80 は まだ まだ や っ て いけ ます 。 
往年 の MZ-80 の 名 に 恥じ ね よう 皆んな で , が ん ば 
っ て いき まし ょ う 。〒515 三重 県 松坂 市 伊勢 寺町 
野田 2267 吉村 厚 哉 


MZ-731。 使用 1 ヶ月 新品 同様 キマ ニュ アル 十 Hu- 
お よび S-BASIC 丁 関連 図書 2 用 ゲー ムツ ソフ ト 
を 。 現 金 8 万 円 で 。 近 県 の 方 、 届け ます 。 和 〒167 
東京 都 杉 並 区 西 萩 北 4 の 10 の 11 飼 田 広美 

文 MZ-80B 十 MZ-8BK (1/O ポ ー ト ) 十 PIO-3039 ( カ 
ラー グラ フィ ッ ク ボ ー ド 。G-RAM 2 ペー ジ ) 十 
Hu-BASIC+ キ ユー ティ リティ イィ, ゲー ムツ ソ フト まし と 
め て 13 万 。 近く の 方 希望 。〒806 北九州 市 八幡 西 
区 穴 生 1 丁目 9 一 11 田仲 政義 

支 PCG-700 新 品 同様 箱入り 。 PCGAID 十 取扱 説明 書 
付 を 1 万 5 千 円 で 売り ます 。 買 っ て くれ た 人 に は 
PCG 用 ゲー ム ソ フ ト 4 本 プレ ゼン ト し ます 。 送料 
こち ら 持 ち 。〒 ま っ て ます 。〒759-02 山口 県 宇部 
市 厚 南 区 東和 爺 E 一 1 藤本 逸 雄 

廊 ト ミー・ ぴ びゅう 太 を 3 万 円 で 売り ます 。 必 ず ハ ガ が 
キ で 。〒116 東京 都 荒川 区 南 千住 5 丁目 28 一 26 
原田 泰昌 

廊 12 型 グリ ー ン ディ スプ レイ (MZ-1D04) を 1 万 5 
千 円 で 。〒475 愛知 県 半田 市 栄町 3 一 239 
田中 幸三 


廊 求 む ク MZ-700 を 5 万 円 どら いで すこ し で ぐら 
い の き ず が あっ て も いい で す よ ク まず は TEL 
(AM 7 時 一 11 時 30 分 、PM 1 時 一 7 時 ) で 
会 03 一 772 一 2430 安達 健二 

文 MZ-1200 又 は MZ-80K2E を 3 万 円 で 買い ます 。 多 
少 の キズ は 可 ( 完 動 品 に 限る )。 送 料 こ ちら も ち 。 
W〒 待 つ 。12 月 末日 まで まち ます 。 
〒780 高知 県 高知 市 北 竹島 町 393 一 11 山中 勇二 

廊 MZ-1200 用 の 拡張 RAM と Hu-BASIC を 8 千 円 以下 
で 買い ます (新品 同様 な ら 1 万 円 前 後 で )。 ま ず 〒 
くだ さい 。〒391 長野 県 茎 野 市 宮川 西 茂 野 6386 
五味 和 明 

支 MZ-1R01 を 10K 円 で 買い ます 。 くだ きい 。 な お 
送料 は こち ら で 持 ち ま す 。〒321-43 栃木 県 真岡 市 
並木 困 2 一 7ー1 石渡 狼 代 

文 最近 MZ フ ァ ン に な っ た 私 で す 。 Oh /MZ の 創刊 号 か 
ら 通巻 第 13 号 を 買い ます 。( ま と め て も バラ で も 可 ) 〒 
くだ さい 。〒062 札幌 市 豊平 区 平岸 5 条 6 丁 目 4 一 16 
大 沼 存 寛 


文 当 方 、 MZ-721 ソ フト 多数 二 マ イコ ン 雑 誌 二 付 属 
品 全部 。 貴方, コモ ドー ル 64 十 付属 品 全 部 、 また 
は PC-6001 十 専用 ゲー タレ コー ダ 十 付属 品 。 
〒050 北海 道 室蘭 市 水 元 町 25 一 27 小枝 明 広 


X 1 を 持っ て いる 女の子 , 一 緒 に ゲー ム を 作り ませ 
ん か 7? 年 令 は 問い ませ ん 。 又 , 良けれ ば 僕 の 作 
っ た ゲー ム で 遊ん で み ま せ ん か 7 どん な に 遠く 
で も いい で す 。〒067 北海 道 江別 市 向ヶ丘 16 一 8 
鎌田 茂雄 

文 自 作 の プロ グラ ム や ゲー ム を 交換 し た り , 最新 の 
情報 な ど を 載せ た 会 誌 な ど を 発行 し て いる クラ ブ 
を 作り まし た 。 パ ソコ ンマ ニア の 方 。 入 会 し て 一 
緒 に パソ コン ライ フ を 楽し み ま し ょ う / 60 円 切 
手 同封 の 上 , 連絡 て だ さい 。 
〒068-04 北海 道 夕張 市 若葉 9 赤平 元 成 

X1 の ユー ザー の 人 。 みん な で X 1 の クラ ブ を 作り 
ませ ん か 。 会 費 は いり ませ ん 。 年 令 ・ 性 別 を 問い 
ませ ん 。 近県 の 人 な ら 誰 で も 0K./ W〒 で 待っ て 
ます 。〒426 静岡 県 藤枝 市 青木 3 一 6 一 10 
山本 光博 
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表 1 


は じ め に GRAPH キー キキ ー ボ ー ド を 同時 に 押す 
最近 の 日 本 闘 (漢字) ワー ド プ ロモ ッ サ す の こと に よっ て 直接 キー ボー ド か ら 入 力 で 
普及 に は 目 を みはる 6 の が あり ます 。 特 に きる 記号 や 単位 の 対応 表 
ワー プ " ロ 専用 機 の 値下げ や 性 能 の アッ プ は キー ボー ド 一 記号 , 単位 | キー ポー ド 一 記 全 単位 
めざまし く , パソ コン で も 各 機 種 用 の いろ ーー に と 
いろ な 日 本 語 ワ ー ド プロ モッ サ が 市 販 さ れ 直接 入力 で きま す 。 を 一 u 肖 kn 
て いま す 。 し か し 残念 な こと に , X1 は 比較 2)JIS 第 1 水準 漢 0 9 Je 革 
的 まだ 新しい マシ ン の た めか , 高 性 能 で あ (2 廊 字 の カナ か ら 漢 字 を 選択 する,) ーー 0 
る に も か か わら ず , ハドソン ソフ ト 社 の カ た は JIS 区 点 コ ユー ド 入 力 方 式 (た と ぇ ば 5 時 2 
セッ ト テ ー プ ・ ペ ベー ス の 「HuWP, だ けし か 「 亜 」 の JIS 区 点 ユ ー ド は 1601) の どちら に 間 ) に 
あり ませ ん 。 か に よる 入力 が で きま す 。 人 人 
カセ モット テー ブ プ 版 は デイ スク ドラ トブ が 3) を の 他 の 記号 , 廊 字 , 第 1 水準 以外 の 人 Ss 
不要 な の で 予算 的 に は 大 助かり で す が , ス 漢字 な ど は JIS 区 点 コ ユー ド で 入力 で きま に テ ら 、 だ So 
ピー ド が 遅い (。 ラン ダム ファ イル が 扱え な す 。 We 、 9 
いな ど , 実用 的 な 面 で は 致命 的 な 弱き を も  ③ 単語 ・ 短 文 の 登録 が で きる : 単語 ・ 短 PS oo 
っ て いま す 。 とりわけ 問題 な の は , 使用 者 文 辞書 は , は じ め は 空 で , 使 用 者 が 自分 に ヘニー ギ ・ 、CSWS 
各自 が 自分 専用 の 「 辞 書 」 を 作れ な いこ と 使い や すい よう に , だ ん だ ん 自分 で 登録 で 2 お 0 
で す 。 辞書 機能 が ある か な いか 自分 専用 し て 行く 方式 。 し た が っ て , は じ め は 大 要 た か 8 Z 一 昌 
の 辞書 が 作れ る か 作れ な いか の 差 は ワー プ 変 で す が , 充実 し て くる と 非常 に 便利 で ーー 人 e.) 
ロ 使用 を 続け れ ば つづ ける ほど 効率 に 違い す 。 辞書 ディ スク 1 枚 に 約 2 万 語 前 後 の >. 間 C 一 提 
を みせ る わけ で , 結局 , 辞書 機能 の な い ワ 登録 が びき, また, 検索 時 間 は 約 1 一 2 et Ss Vp 宮 あ (9 
ー プ ロ は 使い 続け る こと が で き な い と 言っ 秒 程度 で す 。 1 の 生 
で KeCL JA。 ④ 編集 ・ 文 書 作成 機能 : エン タリ ング , を AA 
そう いう わけ で , 今回 は ディ スク 版 に 限 右寄せ , 複写 , 挿入 , 1 行 挿入 削除, 1 ママ M 一 研 
っ て , ある 程度 は 満足 し て 使用 で き る X 1 行 削除 横 時 線 、 タブ 機能 な ど が あり ま 由 1 に 。 
用 の 日 本 語 (漢字 ) ワー ド プ ロ セ ッ サ を 作 ⑤ 印刷 機能 : 印字 機能 は 今回 は 都合 の い 朗 ar: 、。 PS 
っ て み ま し た 。 名 づけ て 「X1-WP」 で す め ま だ 合 ま れ て いま せん 。 次 回 に 表し 半 さ し に 。 人 
が , 改良 すべ き と こ ろ も ある と 思い ます 。 た いと 思い ます 。 も ちろ ん , 今回 の プロ し 衣 Kx。 こい 
読者 の 皆さん か ら の ご 意見 を お 待ち し て い グラ ム を 少し の 変更 で 使用 で きま す 。 辞書 に , 「 東 京 大 学 」( ト ウ ダ イ ) と 登録 
ます 。 (⑥ 作成 し た 文章 の 保存 ・ 再 生 : 今回 の プ し て お きま す 。 も ちろ ん この 単語 を 取り 
ログ ラム で (も ちろ ん ) で きま す 。 出す た め に は キー ボー ド か ら 、「 ト ウ ダ イ 」 
X に WP の 性 能 (⑦ 辞書 ・ デ ィ ス ク の 内 容 参照 ・ 整 理 : こ と 入力 すれ ば よい の で す が , これ を 「 ト ウ 
① 入力 可能 文字 数 : 800 字 (40 文 字 X10 れ も 次 回 に 発表 する も う ひ と つの プログ ダイ デ 」 と 入力 し て も 目的 の 「 東 京 大 学 」 
行 。 2 ペー ジ 、 1 ペー ジ ず ン っ 表 示 ) 。 選 ラム で 行ない ます が , 登録 し た カナ の 読 を 呼び 出す こと が で き , し か も 廊 書 中 に 
択 可 。 み と そ れ に 対応 する 漢字 ・ 単 語 ・ 短 娘 の は 「 東 京 大 学 で 」 と 「 で 」 ま で 入力 され る 
② 入力 方 式 : 内 容 も 見 た り 。 必 要 が な く な っ た り 。 ま よう に な っ て いま す 。 こ の 機能 は 漢字 を 
1) 英 大 廊 字 , 小文字 , 英 数 字 , カタ カナ , ちがっ て 登録 し た 単語 ・ 短 文 を 削除 する 訓読 み で 登録 する ば あい に 非常 に 発揮 し 
ひら が な , そし て よく 使わ れる 一 部 の 記 の に 使用 す る プロ グラ ム で す 。 ます 。 た と えば 「 行 」 を 「 イ 」 と 登録 し て 
号 と 単位 文字 ( 表 1) は キー ボー ド か ら  ⑱ また 次 の よう な こと も で きま す 。 ま ず お け ば ,「 イ ク 」 で も 「 イ カナ イ 」「 イ ケ 」, 


eS 


「 イ キマ ス 」 な ど で も 「 行 」 の 字 が 呼び 出 
せ , し か も 画面 に 活用 語尾 まで 同時 に 入 
力 で きる わけ で す 。 


機器 構成 


この ブロ グラ ム C じ 必要 な 機器 は 次 の と お 


り で す 。 


① X1 本体 拡張 ユニ ッ ト 十 漢字 ROM ボ 


ーー 


② CRT(640X200 の も の な ら 何 で も 0K), 


カラ ー が 望ま しい (CZ-800D)。 
⑬ 2 ドラ イブ の ミニ フロ ッ ピ ー デ ィ ス ク 


ユニ ッ ト (CZ-800F)。 
(〈④ プリ ンタ (CZ-800P)。 

プリ ンタ が な く て も 使用 びき ます が , も 
ちろ ん , それ で は 印字 が で きま せん (も っ 
と も , 今回 は 印字 機能 が まだ 含ま れ て いま 
せん )。 


必要 な プロ グラ ム の 準備 と 文書 用 , 辞書 用 ディ スケ ッ ト の 作り 方 


まず , ディ スク ベー シッ ク (CZ-8FB0 
) を 起動 し て くだ さい 。 

次 に プロ グラ ムリ スト の 

“DATA。1 CREATOR" 
“KANJI。CREATOR" 
“"X1WP-MAIN" 
を 打ち 込ん で ひとつ ずつ ャ ー ブ し て (だ 
い 。 本 シス テム 用 の マス ター ディ イス ケッ 
ト を 1 枚 決め て , これ ら 3 つの プロ グラ ム 
を ギー し て ね きま し よう 。 


文書 保存 用 ディ スケ ッ ト 
の 作り 方 


さて , すべ て 入力 し , セー ブ も し 終え だ 
ら , 又 1 用 に フォ ー マ ッ ト る され た ディ スケ ッ 
ト を 2 枚 用 意 し ます 。 1 枚 は 文書 保存 用 , 
も う 2 1 枚 は 辞書 用 と し ます 。 

次 に , 文書 保存 用 ディ スク に マス ター ディ 
スケ ッ ト か ら 「X 1 WPーM AIN 」 ブ ログ ラ 
ム を 転送 し て くだ さい 。 そ し て マス ター デ 
ィ ス ケッ ト か ら 「DATA。1 CREATOR」 を 


ロー ド し て , 文書 保存 用 デイ スケ ッ ト を ド 
ライ ブ 0 に 入れ て か ら RUN る せま す 。 あ 
と は 画面 の 指示 に 徒 を ば すでに 作業 は 終わ 
り , 文書 保存 用 ディ スケ ッ ト が で き あ が り 
まあ 。 

これ が シス テム で ある と 共に 文書 保存 用 
の ディ イス ケット に な り ま す 。 複 数 ユ ピ ー し 
て , 用 途 別 に 使い 分 けれ ば 非常 に 便利 で す 。 


辞書 用 デ ィ ス ケッ ト の 作り 方 

今度 は 。 マス ター デイ スケ ッ ト か ら 「K 
ANJI。CREATOR」 を ロー ド し て , 辞書 用 
ディ スケ ッ ト を ドラ イブ 1 に 入れ て RUN 
し ます 。 こ れ も , あと は 画面 の 指示 に 従え 
ば す で 終 わり , 辞書 有 有 ディス ケッ ト が で き 
あがり ます 。 

な お , 文書 保存 用 ディ スケ ッ ト も 辞書 用 
ディ スケ ッ ト も 1 回 作れ ば , いっ ぱい に な 
る まで 使え ます 。 文書 を セー プ し よう と す 
る と きま た は 単語 , 短文 を 登録 し よう と す 
る と き に 「disk full」 指 示 が 出れ ば , を 


シス テム 起動 , 文書 作成 ・ 編 集 の 実際 


まず , ディ スク ベー シッ ク を 起動 し て , 
次 に , さき ほど 作っ た シス テム 文書 保存 用 
ディ スケ ッ ト を ドラ イブ 0 に , 辞書 用 ディ 
スケ ッ ト を ドラ イブ 1 に モッ ト し て , 

RUN "X1WP-MAIN" 昌 
と 入力 し ます 。 

し ば らく する と 画面 は 写真 1 の よう に な 
り , 画面 の 指示 どおり , 今回 使う 目的 の 文 
書 保存 用 ディ スケ ッ ト を ドラ イブ 0 に , 辞 
写真 | 


明寺 語 訂 呈 


書 用 ディス ケッ ト を ドラ イブ 1 に モッ ト し 
て , リタ ー ン キー を 押し て くだ さい 。 
する と , 画面 に , 
新 文書 作成 … 1 
文書 呼び 出し …2 
と 表示 され ます (写真 2) の で , 新 文 書 を 
作成 する 場合 は 1、 すでに 作っ て 保存 し て 


ある 文書 を 呼び 出し た い 場 合 は 2 を 押し て 
《 だ さい 。 


1 を 押し た と き は すでに 文書 作 


9 Ss ーーーー、 蘭 二 昌 


れ ぞ れ の 場合 に 対し て あら か じ め 準 備 し て 
お いた 新しい 文書 保存 用 ディ スケ ッ ト ま た 
は 辞書 用 ディ スケ ッ ト を 取り か えて くだ さき 
い 。 い つも よぶ ん に 文書 保存 用 ディ スケ ッ 
ト , 辞書 用 ディ スケ ッ ト を ひと つ ず つ 準 備 
し て お いた だ は ほう が 便利 で すね 。 

な お ,「X 1 WPーMAIN」 プ ログ ラム は 
メモ リ を 節約 する た め に 不要 な スペ ー ス は 
な る べく 入れ な か っ た し , REM 文 も 必要 
な と ころ を 除い て ほとん ど 使 っ て いま せん 
の で 見 に くい 箇所 も ある と 思い ます が , 気 
を つけ て 入力 し て 〈 だ さい 。 

また プロ グラ ム 廊 の な か に REM マ ー ク 
が つい て いる と ころ が いく つか あり ます が 
それ は 次 回 の 拡張 版 へ の 関連 が あり ます の 
で その まま 入力 し て お いて くだ さい 。 

(KANJI。 CREATOR」 プ ログ ラム で は 
1290 行 か ら 最後 まで の 部 分 は カナ 漢字 変換 
の 中 核 と な る 部 分 で , スペ ー ス は すべ て 意 
味 を 持っ て いま す 。 入力 の 際 , スペ ー ス の 
数 に 注意 し て 入力 し て くだ さい 。 


成 モ ー ド に 入り ます 。 2 を 押し た と き に は 
文書 用 ディ スケ ッ ト の 内 容 を 表示 し , ロー 
ド したい ファ イル 名 を 聞い て きま す の て 
ドラ イブ 番号 g よ び こ の シス テム の ファ イ 
ル で ある こと を 表わす 拡張 語 (. KWP) を 
つけ ず に ファ イル 名 を 入力 し ます 。 ファ 
イル を ロー ド し た 後に は 処理 モー ド の 選択 
に 移り ます 。 も し ロー ド し た い フ ァイル が 
な か っ た り , あや まっ て 2 を 押し て し まっ 
た と き な ど は ファ イル 名 を 入力 せ ず に リタ 
ン キ ー だ け 押 し ます 。 そ うす る と , 

「file not found」 

「hit any key」 

と 表示 が 出 ま す の で , 任意 の キー を 押せ ば 
復帰 し ます 。 こ れ は エラ ー が 出 た と き の 処 
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理 の ひと つ で , この 場合 に 限ら ず , エ ラー が 
出 た と き は 任意 の キー を 押せ ば 直前 の 状態 
に 復帰 する よう に な っ て いま す 。 た だ , プ 
ログ ラム 入力 ミス に よる syntax error な ど 
は エラ ー コ ー ド と エラ ー が 起こ っ た 行 番号 
を 指示 し て くれ る だ け で , この よう な と き 
は 実行 を break し て 直す し か な い の で 複 帰 
で き な い と きも あり ます 。 

さて , 今 は まだ 既 文 書 が あり ませ ん の で 
1 を 押し た ば あい , つま り 新 文書 作成 モー 
ド か ら 説 明 を し て いき ます 。 


文書 作成 モー ド 


1 を 押す と 写真 3 の よう に 文書 作成 画面 
の 上 部 に 40 字 分 の スケ ー ル が 表示 きれ ます 。 
左上 に 小 き な 青い 四角 が 1 字 分 表 わ れ ます 。 
この 青い 四角 が 今 何 ペ ー ジ 目 な の か や 示し, 
1 ペー ジ 目 な ら 1 文字 分 , 2 ペー ジ 目 な ら 
2 文字 分 表示 る され ます 。 
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また だ, その 下 に 見 える 線 は カー ソル を 表 
わし て いま す (一 1 一 など カー ソル 移動 
キー を 押し て みて くだ さい )。 ま た スケ ー ル 
上 に ある シア ン 色 の 線 も カー ソル の 位置 を 
表わし ます 。 

この プロ グラ ム は 2 ペー ジ ま で の 文字 を 
入力 する こと が で き , 1 ペー ジ は 40 文 字 メ 
10 文 な の で 800 字 まで の 入力 が で きま す 。 こ 
れ よ り 長 い 文 書 の ば あい は 2 度 以上 に 分 け 
て 作成 し て くだ きい 。 

1 ペー ジ 目 か ら 2 ペー ジ 目 へ 移る とき や 
その 逆 は ファ ンク ショ ン キ ー5 (F5) を 
使い ます 。 フ ァ ン クシ ョ ン キ ー 5 を 押し て 
確か め て くだ さい 。 左 上 の 青い 四角 が 2 文 
字 分 に 変わ り ま すね 。 も う 1 回 F5 を 押し 
て くだ さい 。 1 ペー ジ 目 に 戻り まし た ね 。 
文字 の 入力 (その 1 ) : 
キー ボー ド か ら 直 接 入 力 

英 数 字 は 普段 同じ よう に 入力 する こと 
が で きま す 。 

カタ カナ や ひら が な を 入力 する に は まず 


ーー 


カナ キー を 押し て くだ さい 。 右 上 の 文字 ス 
ケー ル の と ころ に 黄色 四角 が な けれ ば ひら 
が な 入力 モー ド で , あれ ば カタ カナ 入力 モ 
ー ド で す 。 こ の 2 つの モー ド の 切り 換え に 
は ファ ンク ショ ン キ ー 2(F2) キ ー を 押し ま 
す 。 

な お 。 油 点 , 半 濁点 は “・ "。 “5” を 
打つ と , その 直前 に 打っ た 文字 が 滴 音 , 半 
油 音 を 持つ 文字 (カナ , ひら が な ) は 自動 的 
に 付加 る れ ま す 。 持た な いと き に は それ だ 
け で 1 文字 と し て 表示 さる れ ます 。 

この 他 に , 表 1 に 示し た よう に GRAPH 
キー と キー ボー ド を 同時 押す こと に よっ て 
よく 使わ れる と 思わ れる 記号 や 単位 文字 も 
入力 で きる よう に し て あり ます 。 
文字 の 入力 (その 2 ) : 
カナ 漢字 変換 に よる 漢字 の 入力 

漢字 の 入力 に は 3 つの 方 法 が あり ます 。 
1 つ は 次 に 述べ る カナ 漢字 変換 に よる 方 法 


で 、 2 つ 目 は JIS 区 点 コ ー ド に よる 入力 法 , 


そし て 3 つ 目 は 単語 ・ 短 文 辞書 か ら の 入力 
に よる 方 法 で す 。 

まず カナ 漢字 変換 に よる 入力 方 法 を 説明 
しじま ず 。 

それ に は まず F 1 キー を 押し ます 。 画面 


に 「 漢 字 辞書 読み ? 」 と 表示 し ます の で , 


入力 し た い 漢 字 の 代表 的 な 読み (大 部 分 が 
音読 み で す ) を 1 文字 ある い は 2 文字 て 
小文字 , 潤 点 , 半 濁 点 を 使用 し な いで 入力 
し ます 。 た と えば 「 京 」 な ら 音 読み は 「 キ 
ョ ウ 」 で すか ら ,「 キ ヨ 」 と 入力 する わけ で 
す 。 同様 に 。 「 大 」 な ら 「 タ イ 」 と 入力 し 
ます 。 

で 定 は 全 と し で 。 まず リン 5 三才 し 
て くだ さい 。 す る と 画面 が 写真 4 の よう に 
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な り ま す 。 右端 の 赤色 で 示さ れる 数 字 の うぅ 
ち , 上 の も の は 「 シ 」 と いう 読み に 当たる 漢 
字 が 71 個 ある こと を , 下 の 数 字 は その うち の 
最初 の 10 個 を 表示 し て いる こと を それ ぞ れ 
示し て いま す 。11 個 目 を 見 た いと き に は リ 


ター ン キ ー を 押し , さら に 次 の 10 個 を み 
た いと き に は リタ ー ン キー を 押せ ば よい 
の で す 。 ひ と つ 前 の 10 個 の 表示 に 戻し た 
いと き に は ピリ オド キー を 押し ます 。 入 力 
し た い 漢 字 が みつ か っ た ら , その 漢字 の 前 
に ある 数 字 キ ー を 押し て て くださ るい 。 そ うす 
る と カー ソル の あっ た と ころ に その 漢字 が 
表示 され , 画面 の 下 の 表 示 が 消え て この 入 
カモ ー ド か ら 出 て 普通 の 文書 作成 モー ド に 
戻り ます 。 も し 入力 し た い 漢 字 が な い ( 違 
う 音 で 登録 きれ て いる , JIS 第 1 水準 以外 
の 漢字 な ど ) ば あい に は スペ ー ス キー を 押 
し て 《 だ さい 。 カ ー ソ ル 位 置 に は [が 
表示 きれ, 漢字 入力 モー ド か ら 出 ます の で 
カー ソル を 戻し て も うぅ 一度 別 の 読み や 方 法 
で 入力 すれ ば よい わけ で す 。 

また , 入力 し た 読み に 対応 する 漢字 が 一 
つ し か な い ば あ い に は , 画面 下 に は 何 も 表 
示 き れず に , カー ソル の と ころ に を の 漢字 
が 表示 され て この モー ド か ら 出 る よう に な 
っ ち で いい ます 。 

読み に 対す る 漢字 の 並び 方 は 清音 か ら 
濁音 へ 。 そし て 3 字 目 以降 の 読み は アイ ウ 
エ オ 順 ほ と いう ふう に な っ て いま す 。 入力 の 
際 に うま く 使 いこ な し て 〈 く だ さい ね 。 
文字 入力 (その 3) : 
JIS 区 点 コ ー ド に よる 入力 

る き に の べた よう に JIS 第 1 水準 以外 の 
漢字 は 文字 入力 (その 2 ) の 方 法 で は 入力 で 
きま せん 。 ま だ , ギリ シア 文字 や ロシア 文 
字 な ど を 入力 し た いと きも あり ます 。 こ の 
よう 場合 に は JIS 区 点 コ ユー ド に よる 入力 方 
法 で 入力 で きま す 。 

それ に は , F 3 キー を 押し ます 。 す る と 
画面 の 下 に 表示 が 出 て JIS 区 点 コ ー ド 番号 
を 開い て くる の で , 漢字 テー プル を みて 入力 
し た い 漢 字 の 区 点 を 入力 し て リタ ー ン キー 
を 押せ ば よい わけ で す 。 ま だ た コー ド を 入力 
せ ず に リタ ー ン キー だ け を 押せ ば カー ソル 
の と ころ に 何 も 表 示 る され ず に この モー ド か 
ら 出 ます 。 


単語 ・ 短 文 の 登録 


次 に , 単語 や 短文 の 登録 に つい て 説明 し 
ます 。 ま ず 単 語 の 登録 で す 。 
F 1 キー を 使っ て 「 東 大 」 と 書い て くだ 


。 移 ゆめ 


れ ま す 。 こ れ で OK な ら ば リタ ー ン キー を 。, 


書き 終え を たら, カー ツル を 「 東 」 の 

下 に 移動 し て くだ さい 。 登 録 る され る 単語 は 
カー ソル 上 の 文字 か ら 右 へ , 空白 の 直前 ま 
で で す 。 こ こ で 空白 し は スペ ー ス キー も 何 
も 押さ る れ て いな い 部 分 の こと で す 。 も し 登 
録 し た い 単 語 の あと が 空 提 に な っ て いな い 
か も し れ な いと いう と き に は , カー ソル を 
そこ へ 持っ て いっ て F 3 キー で コー ド 番 号 
0 (つま り 空 白 ) を 入力 し て くだ さい 。 

単語 の 登録 に は ファ ンク ショ ン キ ー7(F 
7 ) を 使い ま は す 。 カ ー ソ ル を 登録 し た い 単 
語 の 先頭 に 移動 し た ら , F 7 キー を 押し ま 
す 。 画面 の 下 に 登録 する 単語 の 読み を 開い 
て きま す の で , 必ず カナ で 9 字 以 内 で 入力 
し て くだ さる い 。 今 の 場合 は 「 東 大 」 で すか 
ら 読み は 「 ト ウ ダ イ 」 で す 。 

読み を 入力 し た ら , 読み 方 が いい か どう 
か きい て きま す の で , OK な ら リ ター ン キ 
ー を 押す と , 画面 左下 に 登録 する 単語 が 表 
示さ れ ま すか ら , 正しけれ ば 「Y」 (大 文 
字 ) で 答え て くだ さい 。 し ば ら 〈 し て カー 
ツル が 登録 し た 単語 の 次 に 現れ た ら 完 了 で 
す 。 もし, すでに 登録 済み の 単語 な ら は ば 登 
録 は 行なわ れ ま せん 。 も っ と も , 同じ 単語 
で も 読み が 違え ば 登録 きれ ます 。 

ここ で , あと の 説明 の た め に , 同じ よう 
に , 「 燈 台 」 を 同じ く 「 ト ウ ダ イ 」 の 読み 
て 登録 し て くだ さい 。 

短文 の 登録 も 単語 の 登録 と ほとん ど 同 じ 
「 東 京 大 学 工学 部 」 と いう 短文 な 6, 読み 
を 「 十 トウ 」 と する , と いう 具合 で す 。 

短文 の 文字 数 は 次 式 で 計算 する 値 以下 に 
な る よう に し な けれ ば な り ま せん 。 
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た と えば 「 二 トウ 」 な ら ば 125.5 以下 。 つ 
まり 短文 その も の の 文字 数 は 125 文 字 ま で 
窟 。 
文字 入力 (その 4 ) : 
単語 ・ 短 文 辞書 か ら の 入力 

次 に , 単語 ・ 短 文 辞 書 を 使っ て の 入力 に 
つい て 説明 し ます 。 こ れ に は F 6 キー を 使 
用 し ます 。F 6 キー を 押す と 読み を 開い て 
きま すか ら , ここ で だ たと えば 「 ト ウ ダ イ 」 
と 入力 し て み ま し ょ う 。 す る と , ます 先 に 
登録 し た 「 東 大 」 が カー ツル の と ころ C 現 


そう で な けれ ば , 他 の キー を 押し ます 。 を そ 
うす る と カー ソル の と ころ に 「 燈 友 」 が 現 
れる は ず で す 。「 読 み 」 の 入力 を あや まっ 
た り し た ば あい に は [ECS| キ ー を 押せ ば す 
ぐに 文書 作成 モー ド に 戻り ます 。 

「 東 大 」 か 「 燈 台 」 で リタ ー ン を 押せ ば 
カー ソル の と ころ に それ が 表示 され て この 
モー ド か ら 出 ます 。 

な お , F 1 キー を 押し た と き で も , 読み 
を 3 文字 以上 入力 する と 自動 的 に 単語 ・ 短 
文 辞 書 の ほう を 検索 する よう に な っ て いま 
g 


内 容 の 消去 

[CLR] キ ー を 押す と , 本 当 に クリ ア し 
て いい か を 聞い て きま す の で , よけれ 
ば 「Y」 ま だ は 「? ヵ 」 キ ー, そう で な 
けれ ば 他 の キー を 押し て くだ さい 。「Y」 
また は 「 ヵ 」 を 押せ ば , 1 ページ の 内 容 
は すべ て 消去 きる きれ, そし て も し , 2 ペー ジ 
目 に 何 か が 書い て あれ ば , 2 ペー ジ 目 の 
内 容 を 1 ペー ジ 目 に 表示 し , 2 ペー ジ 目 は 
空 に な り ま す 。 ま た だ |CLR | キー を 押し た と 
き に 画面 が 2 ページ 目 に な っ て いれ ば , 2 
ペー ジ 目 の 内 容 だ けが 消去 きれ ます 。 消 去 
が 終わ っ た ら , ホー ム 位 置 に カー ツル が 現 
れ ま す 。 
セン タリ ング 

文書 の タイ トル を 書き た いな ど 文 を その 
行 の 中 央 に 表示 させ た いと き に 使い ます 。 
それ に は , モン タリ ング し た い 行 に カー ソ 
ル を 移動 し て CONTROL 十 [AI キー を 押す 
か , F 4 キー を 押し て か ら [C ほ また は [c] ま た 
ば ッ | キ ー を 押す か の 2 つの 方 法 で 行なう こ 
と が で きま す 。 セ ンタ リン グ が 行なわ れ た だ 
あと カー ソル は 次 の 行 の 先頭 に 移り ます 。 

ここ で 注意 し な けれ ば いけ な い の は , ス 
ペー ス も 文字 と し て 扱わ れる こと で す 。 セ 
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ンタ リン グ を 実行 し て も 目 に 見 える 文字 が 
セン ター あわ せ に な ら な いと き は スペ ー ス 
の せい だ と 思っ て 〈《 だ さる い 。 先頭 文字 の 箇 
所 に カー ソル を 持っ て き て , スペ ー ス を 
DELETE し て くだ きい 。 左端 ま び スペ ー 
ス を 削除 し て モン タリ ング すれ ば 0O K で す 。 
右寄せ 

日 付 、 ペ ー ジ , 名 前 な ど 紙 面 の 右端 に 文 
書 を 寄せ た いと き に は , まず , カー ツル を 
その 行 に 移動 し て ( 何 文字 目 の と ころ で も 
か まい ませ ん )。F4 キ ー を 押し て か ら [IR ほ た 
は Ir ほ た は | ス 式 一 を 押し て くだ さい 。 す る 


と 文書 は その 行 の 右端 に 移動 し , そし て 行 
の 先頭 か ら そ の 文書 の 前 まで スペ ー ス が 入 
り , カー ツル が 次 の 行 の 先頭 に 移動 し ます 。 
削除 

削除 を 行なう に は 3 つの 方 法 が あり ます 。 
① [DEL キー また は [CTRL [キー で 
行なう と カー ツル より ひと つ 前 の 文字 を 1 
字 だ け 消 し て , 空白 また は 「!」,「ー」 ま 
で の 文書 が 1 つ 前 に 移動 し ます 。 
⑨② [CTRL HE 代 一 で 行なう と カー ソル 
以降 の , その 行 に ある 文字 を すべ て 消去 し 
(空白 に な り ま す ), も し カー ソル が 行 の 先頭 
に あれ ば , 1 行 の 内 容 を すべ て 消し て , 行 
づめ も 同時 に 行ない ます 。 
③ [CTRL HIN キ 一 。 こ れ は ある と ころ 
か ら あ る と ころ まで の 文書 を 消去 し た いと 
き に 使い ます 。 そ れ に は まず カー ソル を 消 
去 し た い 文 書 の 先頭 に 移動 し て , [CTRL | 
+[N キ 一 を 押し ます 。 カーソル の 位置 が 空 
日 だ っ た 6 無視 る れ ま す が , スペ ー ス で あ 
れ ば 赤い 四角 が 表示 され る は ず で す 。 を そし 
て , も . し カー ソル の 位置 に 文字 が 書か れ て 
あれ ば その 文字 が 赤く 変わ り ま す 。 カ ー ソ 
ル も 今 ま で の 水色 か ら 黄 色 に 変わ り ま す が , 
これ は 削除 モー ド に 入っ た こと を 示し て い 
ます 。 カー ソル 移動 キー ( と 器 ) を 使っ 
て 削除 し た い 文 字 ま で カー ソル を 移動 し て 
《 だ きい 。 こ の と き カ ー ソ ル は 空白 や み ど 
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ン デ 


e 2 ン 


し 


り 色 の 文字 (これ は プリ ント され な い 改 行 て 
ー ク な どの 文字 で す ) を 右 に 飛び こえ る こ 
と が で きま せん し , 赤い 文字 を 飛び こ ぇ て 
左 に 行く こと も で きま せん 。 カー ソル を 削 
除 し た い 文 字 列 の 最後 の 文字 に 移動 し た ら , 
も う 一度, [CTRLI+[N] キー を 押せ ば , 操 
作 完了 で す 。 水 色 の カー ソル が 戻っ て きま 


作成 し た 文書 の ある 文字 か ら あ る 文字 ま 
で の 一 部 分 を キー 1 回 に た く こ と に よっ て 
すでに 入力 で きる よう に する に は , まず を 
の 文字 列 を 登録 し な けれ ば な り ま せん 。 を 
れ に は , まず , 登録 し た い 文字 列 の 先頭 に 
カー ソル を 移動 し ます 。 次 に 登録 し た い 文 
字 列 の 最後 の 文字 の 次 の 文字 に カー ソル が 
移動 する まで [CTRL |+[P| キー を た た き 
ます 。 1 文字 登録 する た びに , 画面 下 に 登 
写真 7 


録 さ れ た 文字 が 黄色 で 表示 る れ ま す 。 また こ 
の と きも 気 を つけ な けれ ば な ら な い の は , 
登録 する 文字 列 は 必ず ひと つづ き の も の で 
な けれ ば な ら な いこ と で す 。 空白 の と ころ 
に [CTRL|+IP| キー を 押す と 今 ま で 登録 
きれ て いた も の は すべ て 消え , あら た に を 
の 位置 か ら 登録 が は じ ま り ます 。 登 録 が 無 
事 に で きま したら , 次 に カー ソル を 適当 な 
と ころ に 移動 し て , F 4 キー を 押し て か ら , 
[D | また は [d] ま た は | シシ | キー を 押し て みて 
くだ きい 。 カーソル の 位置 か ら 登録 し た 文 
字 が 表示 され る は ず で す 。 登録 され た 文字 
は 次 に 登録 操作 が 行なわ れる まで 有効 で す 。 
肢 線 

時 線 に は 3 種類 が あり ます 。 画面 で は 線 
の 形 は 同じ だ が , プリ ント する と き に は を 
れ ぞ れ 1 が 細線 。 2 が 2 重 線 、 3 が 太線 と 
し て プリ ント され ます 。 画面 で は 野 線 を 引 
いた 行 の 最後 に 志 さ れる 緑 の 数 字 の 1, 2 
3 で 区 別 き され ます 。 

野 線 を 引 《 く ため に は まず その 行 の 先頭 に 
カー ソル を 移動 し な けれ ば な ら な い 。 次 に 


ーーーー レン 
に 雇 議 ブ ?2 onioz SN 
の 


し 


CTRL |+ [0] キー を 押せ ば , 画面 の 下 に ど 
の 線 を 選ぶ の か を 聞い て きま す の で 1 一 3 
の 数 字 を 入力 し て くだ さい 。 


画面 に 描か れ た 野 線 に は 途中 に 別 の 文字 

を 書い た り し な いよ うに 注意 し て くだ さい 。 

その 他 の 編集 機能 

① [CTRL|+|B| キー で カー ソル が を その 

行 の 先頭 に 移動 する 。 

⑧ [CTRL|+[F| キー で カー ソル が 右 に 

8 文字 分 移動 する 。 カー ソル の 通っ た あと 

は 何 も 書 か れ ま せん 。 

③ [CTRL|+[K| また は [HOME| キー 

で カー ソル が ホー ム 位 置 に 移動 する 。 

④ [CTRL|+ [| また は [CLR | キー で 

内 容 消去 を 開始 す る 。 
M 
1 


⑤ [CTRL|+IM| で キャ リッ ジリ ター ン 。 
⑥ ICTRL|+[I| また は [HTAB| キ ー で 
桁 で ろ え を 行ない ます 。 こ の と き カ ー ソ ル 
は 1, 9, 17, 25, 33 字 目 に 順次 移動 し ま 
す 。 ま た だ た, カー ソル が 通っ た と ころ が 空白 
で あれ ば スペ ー ス を 書い て いき ます 。 こ の 
点 が [CTRL|+IF| キー と 違い ます の で 十 
分 注意 し て , また 両者 の 違い を うま く 使 っ 
お っ の 
⑦ [CTRL|+[R] ま た は [INS] キ ー で 挿入 
が 行 な な ます 。 挿入 に は 2 種類 が あり ます 。 
1) 1 行 分 挿入 で き る 空白 行 を 作る も の と , 
2) 字数 を 指定 し て , その 字数 分 だ け ス ペ 
ー ス を 作る も の で す 。 

1) の 場合 に は まず 挿入 し た い 行 に カー ソ 
ル を 移動 し て , 次 に [INS] キー を 押し , す 
る と 画面 の 下 に どの 挿入 モー ド に する の か 
を 聞い て きま す が , この 場合 は 0 と 押せ ば 
いい わけ で す 。 

2) の 場合 に は 挿入 し た いと ころ に まず カ 
ー ソ ル を 移動 し て , [INS | キー を 押し ,、 す 
る と 同様 に 画面 の 下 に どの モー ド に する の 
か を 聞い て きま す の で , この 場合 は 指示 の 
数 字 (この 数 字 は 一 続き の 文書 の 文末 か ら 
その 行 の 行末 まで の 字数 分 で す ) 以内 の 数 


字 を 入力 し て くだ きい 。 こ の 2 つの モー ド 
を 組み 合わ せ て 使う と きら に 長い 文字 列 の 
挿入 も で きま す 。 

⑧ [CTRLI+[RI キ ー で 上 の 行 の 同じ 位置 
に ある 文字 を 複写 し ます 。 したがって, カ 
- 番 上 の 行 に ある と き や 上 が 空 妖 
の と き に は 無視 され ます 。 

⑨ 改行 マー ク リタ ー ン キー を 押す と , 
その 場所 に 緑色 の 改行 マー ク 円 が 表示 され , 
カー ソル が 次 の 行 に 移り ます (画面 上 の 妹 
色 の 文字 は 印字 時 に は 無視 され , た だ の マ 
ー ク で ある こと を 示し ます )。 リタ ー ン キ 
ー は 画面 上 で も 印字 時 に お いて も 改行 を す 
る 記号 を 書く (キー で ある わけ で す 。 

な お 1 行 が 40 字 に 満た な いと き に は 最後 
の 文字 の あと で 必ず リタ ー ン キー を 押さ な 
けれ ば な り ま せん 。 
⑯⑩ エン ド マ ー ク 文書 の 作成 を 終え た と 
き , ある い は 2 ペー ジ 目 の 最後 まで 入力 し 
た ら 文 末 に エン ド マ ー ク を つけ な けれ ば な 
り ま せん 。 た だ だし, 文書 が 800 字 目 に 及ぶ 
と き に は エン ド マ ー ク を つけ る 必要 は あり 
ませ ん 。 

エン ド マ ー ク を つけ る に は 文末 の と ころ 
で F 8 キー を 押し て くだ きい 。 す る と 文末 
に 緑色 の マーク が 表示 きれ, カー ソル は 
ホー ム 位 置 に 戻り ます 。 

これ で 文書 の 作成 編集 が 終わ り ま す 。 次 
に 処理 モー ド を 説明 し まし ょ う 。 F10 キ ー を 
押し て くだ きい 。 


処理 モー ド 


ー ソ ル が 


文書 作成 モー ド か ら F10 キ ー を 押し た と 
き , また ディ スク か ら 既 文書 を 呼び 出し た 
と き , この 処理 モー ド に な り ま す 。 処理 に 
応じ て 0 一 7 まで 数 字 キ ー を 押し て くだ さい 。 
0 : モー ド 切 替 

既 文書 を 呼び 出し た あと に , ある いけ は 今 作 
成 し た 文書 の 内 容 を 確認 し た り , 編集 し な 
お し た り し た いと き に は 数 字 0 を 押し て く 


表 2 ファ ンク ショ ン キ ー の 機能 表 


だ きい 。 す る と 文書 作成 モー ド に 移り , 1 


ペー ジ 目 か ら 表 示 を 始め ます 。 こ 
F. | | ヵ ナ 江 字 変換 に よる 漢字 入力 MY の の 
F。 2 | カタ カナ ひひ ら が な 入力 モー ド 5 と F10 キ ー は いつ で も 受け 付け られ ます 
F。 3: |JIS 区 点 コ ー ド に よる 入力 モー ド の で , 2 ペー ジ の 内 容 を みた けれ ば F 5 キ 
F. 4 | セン タリ ング ・ 右 寄せ ・ 複 写 ー を 押せ ば すぐ 2 ペー ジ の 内 容 を 表示 し ま 
F。5 | ペー ジ 切 り 替 え すし , F10 を 押せ ば すぐ 処理 モー ド に 移り 
F. 7 | 単語 ・ 短 文 登録 8 を 
シン ポーク 1 : 新 文書 人 メモ リ 上 に ある 作成 し た 
F.9 | 未 使用 文書 を 保存 する と き に は 1 を 押し ます 。 す 
F. 10 | 処理 モー ド 娘 書 作成 モー ド 切 替 る と ファ イル 名 を 聞い て きま す の で , ファ 
] ] イル 名 を 入力 し て くだ きい 。 モ セー プ し た あ 
と は 自動 的 に 処理 モー ド に 戻り ます 。 
表 3 [ CTRL +| キー 朋 能 表 2 : 新 文書 作成 メモ リ を すべ て 空 に し て 
| 避 2 本 文書 作成 モー ド の 1 ペー ジ に 移り ます 。 
ン ン 5 Ss 
oe 3 : 既 文書 呼び 出し すでに 保存 し て ある 
| 行 削除 | ファ イル を 呼び 出す と き に は 3 を 押し ます 。 
| | 右 へ 8 文字 分 移動 する と , 文書 保存 用 ディ スク の 内 容 を 表示 
回 | 字 削 除 | し , 呼び 出し た い フ ァイル 名 を 聞い て きま 
円 | 桁 や る ろ え タプ す の で 入力 し て くだ きい 。 ロ ー ド 後 。 処理 
[K] | ホー ム 位 置 へ カー ソル 移動 | モー ド に な り ま す 。 
晴天 | 4: 印 刷 今回 は まだ プリ ント の 部 分 を 発 
還 | キャ リッ ジリ ター ン ee 
慰 任意 区 間 削 除 表し て いま せん の で 次 回 に 説明 し ます 。 
[Q] | 暑 線 を 引く モー ド に 入る 5 : 更 新 既 文書 を 呼び 出し て 一 部 変更 な 
回 | 複写 ど を し た あと に , 前 と 同じ ファ イル 名 て 保 
回 | 上 の 行 を 複写 存 し 直す と き に は 5 を 押し て 指示 に し た が 
同 挿入 に 
っ て くだ る い 。 


6 : 抹 消 文書 保存 用 ディ スク に ある ファ 


イル を 抹消 し た いと き は 6 を 押し ます 。 こ 
の 場合 も 指示 に し た が っ て 操作 し ます 。 
7 : 終了 7 を 押す と 確認 し (て きま す の で 
「Y」 か 「N」 を 入力 し て くだ さい 。 


人 @ あ こと が き 


いか が で し た か 。 説 明 は これ で 終わ り ま 
す が , 実際 に 文書 作成 に 入る まえ に , まず 
で た ら か ひな 文章 で いい で すか ら , いろ いろ 
書い て , 編集 機能 を 十分 に 理解 し て くだ さき 
い 。 特 に , 文章 作成 時 に お いて , 余 臼 を と 
る ば あい , 必ず スペ ー ス キー を 用 いる 習慣 
を つけ て くだ さい 。 ま た , 行 の 途中 で 改行 
する 場合 は , 必ず , リタ ー ン キー を 押す よ 
う に 。 こ の 2 つの 点 を 守っ て いた だ けれ ば 
効率 の 良い 文書 作成 , 保存 が で きる よう に 
が る で し ょ う 。 

さて , 次 回 で す が , 今回 の プロ グラ ム に , 
印刷 (印字 ) 用 の プロ グラ ム を つけ 加え て , 
作成 し た 文書 や 保存 し て ある 文書 ある プ リン 
タ に 出力 する よう に 機能 を アッ プ し た いと 
思い ます 。 ま た , 単語 ・ 短 文 辞書 の 内 容 を 
参照 し た り 整 理 す る た め の プ ログ ラム も 発 
表す る 予定 で す 。 

皆さま か ら の ご 意見 , ご 要望 を お 待ち し 
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1919 
1929 
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1959 
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3 199 
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を 米 ポ 氷 DQT。 1 CREATOR 

IDTH 49:CONSOLE 9,25:SCREEN 9,99@ 

CLS 4:LOCATE 9,8:PRINT "テー クタ ラ ヲ サッ クセ イ シマ スズ 。" 
PR INTiPR INT "トド ライフ ~ 9 ニ テバ イス ク ラ セッ ト シテ クタ "サイ 。“" 
PRINTiPRINT" [RETURN] キー ラ オラ シテ クタ サイ 。 "5 

IF SC て (INPUT 和 (1)) く > 13 THEN 1959 


CLS 4:LOUCATE 9,8iPRT1INT "DATG ラ サク セイ シテ イマ ス 。" 

OPEN "0"』 欄 1。 "9IDTQ。 1" 

FOR 1=9 TO の 4:PRINT 村 1,899+TiNEXT 

RESTORE 1239:FOR 1=?5 TO 223:RERD DTIPRINT 手 1。 DTINEXT 


RESTORE 1159:FOR 1=1 TO 1 る iREAD ZsPRINT 析 1。 プ 5NEXT 

RESTORE 1179:FUR 1!=9 TO 43:iREAD IPRINT 折 1。 プ 5NEXT 

RESTORE 11 ヶ 9:FOR 1=1 TO 47iREAD ZiPRINT 提 1, ZiNEXT 

CLOSE 折 1:CELS 4iLOCATE 9,8iPRINT CHR も (7) "COmp 1ete。" 
END 

DaT…@ 
DAT 
DRTa 
DaTa 
DaT 台 
DaT^ ム 
DaT^ ム 
DAaT 人 台 
DAT ム ら 
DaTa 
DaT ム 
DaT 人 台 
DaT 台 


@191,9191,9191, ロ 213』9 ど 11。9134 
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の 」 の 。1。 1) 2」4。 3。1」1」3) つ )4」 1 の 」1』2) 1 1, 152。 1。 1 

1 1。 1。3。 る 2) 2。 1 15 15 1 15 15 1 1。1)1)1。1。1。15 1。1 

4224, る 2 の 8 1 , 454 ク 」 ロ 5 コウ 」 59 づ 95 つら, 95 15, 9482,9191, 9541 
9554 9142,9191,9316,9191,9143,9443,2813,228 1 , 454 ァ 
9525, 95 15, 9482, 9191,」954 1 9573, 9594,9554,9142, 9191 
3362」 38 タ 4 9423」9438, 94 15。 9432 9421,9494,9193 

93 る 3」9199, 2 つ 99, 9 1 の 5。 9599」 ロ 6 ら 99, ロ 7Z99。9362」 364」9298 
15?,9178, 9125, 9124,958?,9158,9191,9191,9191,9191 
9191,g19d1。9191,9191,91g@1,919d1,91d1。9191。91gd1。9191 
8191』9191。9191,9d191, ロ 193,9154,9155」 9192,9196。948 
949 1 463」 4095」 ロ 49 ア 」 ロ 49 ア 」94 る 7」 ロ 4 る の 94 1,」9435, 9128 
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漢字 ワー ド プ ロ セ ッ サ 725 ヶ 
L』 M 間 


く 。 
N 6 
い ソ 


9492,9494,9492,9498。94 19,9411,9413,94 15, 9417,941 ウ の 
642 1 22394 ご 94 ど 7 942 ウ の, 43 1 9433, 943 る 6, 9438, 9449 
8442, 9443,9444, ロ 445, 9446 る 』9447,9459,」9453, 945 る , 945 ァ 
946 ご 」 ロ 4 ら 63, ロ 46 ら 4, ロ 4 ら 5」946 る 6』。9468。9479, 9472。 9473, 9474 
9475, 947 ら 6, 947 ア ,947 ア タロ 483。91 1 1。91 12」17 プ 63。 32 15。 2378 


コウ, ご アウ 4」4 つ 1 の 2」9 ら 2 ロコ 。 ロ 6 つら 』 9 コウ 4 」 36 1 , ロ 4 1 」 ロ 29 の 。 1 る 2 


1 る 63, 164」91 る 6 ら 」 9 らら 了 」 68 1 。 ロ 6 は 2』 ロ 683」9 る 4」 ロ 685, 968 る 
9 る 87 ア 」 ロ 6BB。 9 ら は の 」 ロ ら ウ アロ 91 どら 。 958B。9188, 9152,9153 


KANJI。CREATOR 


1999 ^ 
1919 
1929 
1939 
1949 


素 氷 氷 KNJT+DIC DISK CREATOR PROGRAN ※※ 水 

LILIDTH 89:CONSOLE 9,25:SCREEN 9,9,9:COLOR4 iCS1 プ E3 
CLS 4:LOCRTE 9,4:PRTINT 柱 9 
PRINTiPRINT:PR INT 柱 9 
PRINTiPRINTIPR INT 柱 9 
1959 PRINTIPRINTIPRINT 社 9 


"カン シ ~ テーー ク ノ ファ イル ラ ヲ ラ サク セイ シマ ス s“" 
トカ フシ シマ ュ ク コ ^ ジン あき - 三 ズル テー イィ スケット = 
トラ イフ ” 1 ニニ ルル タテ RETHEUURN・- キ ェ ララ" 
"オシ テク タ ~ サイ 。『 


192 る 9 IF 人 SCCINPUT も 〈1)) < く > 13 THEN 1949 

1979 CLS 4:LOCATE 9,4:PRINT 村 9 "テー ク サク セイ チュ ウ テ ヾ ス ョ " 

1989 LOCATE 9, の iCOLOR 1 

16?9 FOR 1=1 TO 192iPRINT" ホ "jiNEXT 

1199 LOCATE 9, ヶ :COLOR 5 

1119 OPEN "R"。 村 1。 "1kKQNJI" 

1129 FIELD 提 1,255 の QS も 

1139 FOR J=1 TO 44 

1149 READ 1} 

1159 LSET =Z1 ま も 

11 る 9 PUT 拉 1。JEiPRINTCHR も て 8&HE 1) 』 

1179 NEXT 

1189 CLOSE #1 

11 ヶ 9 FOR K=1 TO 44:READ 

1299 FOR KK=1 TO Z 

1219 OPEN "R"。 村 1。" 15J"+CHR 和 て K+17 る ) +STR 和 て KK) 

1229 CLOSE 1:PRINTCHR 和 SHE9) 

1239 NEXT 

1249 NEXT 

1259 0DPEN "R"」 手 1」 715 +1" 

12 る 9 CLOSE 1:COLOR ア 

1279 CLS 4:LOCATE 9,8:PRINTCHR も (7) 』 "comPp1ete." 

1289 END 

1229 DATA アァ 4  @16 る 91 ァ イ 5 9@1695 ァ オ 1 9@1619 ァ カ 1  @1611 ア キ 1 91612 ァ ク 3 91 る 13 ァ サ 1 
16 る 1 る アシ 3 91 る 1 アァ ス 1 91229 ァ アツ 3 91 る 21 ア テ 1 91624 ァ ネ 1 91 る 25 ァ フ 1 914226 ァ メ 1 9 

1 る 27 ァ f ヤ 2 912 る 28 ァ + ュ 1 91 る 239 アァ ルル 1 1631 ァ ワウ 2 9@1632 ァ ン 8 916 る 34 

1399 DATQ イ 39 91 る 242 イキ 1 91 る アイク 2 91 る 7 ア 3 イ ソ 1 91675 イ チ 2 916 る 7 る イツ 2 91 る 78 イ ネ 1 
9@1289 イ NN 1 9@1281 イ モ 1 91 る 82 イ フウ 1 91683 イ ン 1 る @1 る 84 

1319 DATA ウ 8 917 ア 962 カ 1 817 ア 14 ウ シ 1 91715 ウ ス 3 917 了 16 ウ ソ 1 917 ア 1222 1 917292 ツ 2 
9 1 ア 721 ウ ナ 1 91723② い 1 91724 ウ マ 1 91725 ウ ラ 1 91726 る ウリ 1 91727 ウ ル 1 9172822 1 9@ 

1 ア 2? ウ ン 3 91739 

1329 DATQ エ 2  @1733 ェ イ 18 91 ア 35 エ キ 4 91753 ェ ツ 4 9175 ア エ ノ 1 9176 る 1 エン 25 9176 る 2 

1339 DATA オ 2 91787 オ イ 1 91782 オ ウ 16 917 の 9 オカ 1 91812 オ キ 2 91813 オ ク 4 91815 ォ オケ 1 
618 1 の オス 1 91829 オ ツ ッ 1 91821 オ レ 1 91822 ォ ロ 1 91823 ォ オン 4 9@1824 

1349 DATA カ 52 91828 カ イ 44 91889 カ エ 1 91 め 31 カ オ 1 91239 カ キ 4 91232 カ ク 25 9123 る カケ 1 
@ 1 る 1 カサ 1 91 の 6 る 2 カシ 4 81 の 6 る 3 カタ 1 9d1 の 6 る 7 カツ 12 91268 カ ナ 1 91289 カ N 3 91281 カ フ 2 9 

1284 カ マ 4 91286 る 力 1 9 の 1 の 29 カ モ 1 91 め ウツ 1 カヤ 3 91 ツ 222 カ 1 1 92991 カ リ 2 92092 カ ワウ 1 9299 

4 カン 9 920@5 

1359 DATAQ キ 5 る 9@29 ア 5 キク 3 9213 ア キチ 1 92149 キ ツ 5 92141 キ ヌ 1 9@214 る キネ を 1 92147 キ ヒ 1 
82 148 キ ヤ 5 9214 ウ キュ 24 92154 キ ヨ る 1 9217B キ リ 1 92245 キ ロ 1 92246 キ ン 22 9224 ア 7 

13 る 9 DATA 2 15 922 る ツクイ 1 92284 ク ウ 5 92285 ク シ 3 922 ウ 9 クス 1 。 922 め 3 クツ 6 92224 ク 2 ホ 1 
9239 る クマ 2 92397 ア ク ァ 1 9239 ウ クリ 2 923192 ワ 2 923122 ッ ン 7 92314 

13 ア 9 DATA ヶ 3 92321 ケ イ 49 92324 ケ キ 5 92364 ケ ヶ ケタ 1 9@236? ケ ツ の 92379 ケ ヶ ン 59 89237 

1389 DATQ コ 45 92435 コ イ 2 92489 コ ウ ツウ 9 92482 コ ク の 92578 コ シ 3 92587 ア コッ 3 925?9 コ マ 1 
0825 の 3 コミ 1 925 ヶ 4 コレ 1 92691 コ ロ 1 92692 コ ン 1 @26 る 93 

13 ゥ 29 DATA サ 17 926 る 1 の サイ 3③1 92636 る サエ 1 0926 る 7 サカ 5 、 92668 サキ 92673 サ 2 12 926 る 78 サ ケ 1 
9 つる の 9 ササ 1 926 ウ 1 サシ 1 926 ウ 2 サッ 1 1 926 の 3 サ 2 92 ア 19 サ ヒ 1  @2712 サ メ 1 92713 サ ラク 2~9 

2 ア 14 サ ン 21 92716 

1499 DQTQ シ ア 1 927 コ アシ オ 1 9g2814 シ カ 1 。 9215 シ キ 3 9281 る シク 2 9281 タ シシ 1 92821 シ ス 1 
92822 シ チ 1 9g2823 シ ツ 11 92824 シ ト 1 92835 シ ノ 2 92836 シ NN 3 92838 シ へ 1 92841 シ ラマ 1 9@ 

2842 シ ヤ 28 9d2843 シ ュ の 5 92871 シ ヨ 128 92272 シ リ 1  @3112 ン 45 93113 

1419 DQTA ス 7 了  G3158 ス イ 17 ア 931 る 5 スウ 6 93182 ス エ 1 93188 ス キ 2 93182 ス ケ 1 93121 ス コ 1 
9831 の 2 スス 1 。 931 の 93 スソ 1 93124 ス ミ 1 93291 ズ リ 1 93292 ス ン 1 93293 

1429 DATA セ 4 93294 セ イ 33 93298 セ キ 17 93241 セ ッ 12 93258 セ = ミ 1 93279 セ ン 48 93271 

1439 DATA ソ 21 93325 ソ ウ ニコ 3 334 る ソ ク 1 934G5 コ ッッ 1 9@3429 ソ テ 1  @3421 ソ レ 1 93422 ソ ロ 1 
63423 ソ ン る 93424 

1448 DATA 2 1 る 83439 ヲ ライ 22 9344 る ヲ カ 1 9347 ア 5 ラキ 2 934 ア 6 る タク 13 @34 ア タケ ヶ 1 934 ヶ 1 ラコ 

っ 934 タ 2 タタ 3 934 ヶ 4 ラッ 5 93593 ヲ ラテ 1 93598 タ ト 1 9359 ツ タナ 1 93519 タ ラニ 1 935112 ヌ 1 

3 12 タラ 1 935132 ル 1 935142 レ 1 935152 ン 2 93516 

1459 DATQ チ 14 93545 チ ク る 9355 ゥ チッ 2 935 る 5 チ ヤ 3 98353 る 7 チュ -.14 93579 チ ヨ 41 93584 チ ン る 
83 る 3 1 
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1469 DATA ツ 1 93 る 37 ッ イ 5 93638 ツ ウ 2 93643 ツ カ 3 93645 ツ キ 1 93648 ツ 2 1 9364 タ ツケ 2 
93659 ツ シ 1 93652 ッ ヲタ 1 93653 ツ ッッ 1 93654 ツ N 2 93655 ッ フ 1 93657 ッ ホ 2 93658 ッ ウマ 1 9@ 
3 る 6 る 9 ツウ る 1 9366 る 1 ツメ 1 93662 ッ リ 2 936 る 3 ツル 1 93665 
147@ DATA テイ 34 936 る る テキ ウ 93792 る テツ 6 93715 テ ッ 17 93721 
1489 DATA ト 23 93738 ト ウ る 3 937Z61 ト キ 1 93839 ト ク 11 93831 ト チ 2 93842 ト ッ 2 93844 ト ト る 
938434 ト ヒ 1 93848 ト マ 1 9384? ト ラ 1  @3859 ト リ 1 93851 ト ロ 1 93852 ト ン 11 93853 
1429 DATA ナ 2 838 る 4 ナイ 1 9386 る ナカ 1 938 る アナ キ 2 93868 ナ ソン 1 938 ア 9 ナタ 1 93871 テ ナッ 1 の 
963872 ナ へ 1 93873 ナ ラ 1 93874 ナ レ 1  @3875 ナ ワウ 2 9387 る テン 5 93878 
1599 DATA = 4 938B83 ニ オ 1 9388 ア ニキ 1 93888 ニ 2 ク 1 9388? ニ シ 2 、 938 ヶ 9 ニチ 1 938 め 2 ニュ 2 
938 め 23= ヨ 2 93291 ニ ラ 1 93293= ニ > 4 93294 
1519 DATA ヌル 1 93298 
1529 DATA ネ 2 93 の 292 ネイ 1 93 の 11 ネ キ 1 93 の 12 ネ コ 1 93213 ネ ツ 1 93214 ネ ン 6 93215 
1539 DATA ノ 4 93221 ノ ウ 8 93225 ノ ソ 1 93233 ノ = 1 93234 人 o 当 
1549 DATA IN 13 93235N イ 24 93248 エ 1 327Z2n カ 1 9373 キ 2 3274 ハク 1 の 93 め 7 る n コ 2 
94991 ハ サ 1 9g4993n シ 2 94994 ハ ス 1 94996GN セ 1 94997N2 4 94998n チ 2 94912n ツ タ 9@ H 
4914 ト 1  g4923N ナ 2 94924 マ 1 94926nf 1 94927n ン 31 94928 
1559 DATA ヒ 37 94952 ヒ イ 1 9 ら 4192 ヒ エ 1  g4193 ヒ キ 2 94194 ヒ ケ ヶ 1 94196 る ヒコ 1 94197 ヒ サ 1 
94198 ヒ シ 2 9419 ウ ヒッ ツ 5 94111 ヒ ノ 1 94116 ヒ メ 2 9@4117 ヒ モ 1 94112ET 1 94129 ヒ E+ ユ 1 9 
4 121 ヒ ヨ 17 94122 ヒ ル 2 94132 ヒ レ 1 94141 ヒ ン 19 94142 尼 
1569 DATA フ 33 94152 フ 9 3 94185 フ キ 2 9g4188 フ 2 の 941 の 6 フチ 1 94295 フ ッ 5 94296 フ ナ 1 4 
94211 フ ン 14 64212 De 
1579 DATA ヘイ 14 9422 る 2 へ く キ 4 94249 ヘ ツ ッ 3 94244^ ラ 1 94247 ヘ ン 13 94248 
1589 DAT ホ 18 9426 る 1 ホウ 57 9427 ウ ホ エ 1 94342 ホ オ 1 94343 ホ ク の 94344 ホ ク 1 94353 ホ ッ ク 2 
64354 ホ ト 1 94356 る ホリ 1 94357 ホ ロ 1 94358 ホ ン ッ 5 9435 ヶ 
15 ヶ 9 DATA マ 4 9@4364 マ イ る 9436B マ キ 1 94374 マ ク 4 94375 マ サ 1 、 943 アウ マス 2 94389 マ 2 3 
94382 マ ツ 3 94385 マ テ 1 94388 マ マ 1 9438 の マユ 1 943 の 9 マロ 1 943 め 1 マン 5 94322 に 
1 る 99 DaTQ ミ 5 84493 ミ サ 1 9g4498 ミ ツ 2 9449 ウ ミナ 1 94411 ミ ノ 2 94412= ヤ 1 94414 ミ ヨ 1 
94415 ミ リ 1 94416 る = ミン 2  @4417 
1619 DATA < 7  @g441 め 62 1 944226 る コ 1 94427Z ス 1 94428 半 
1629 DATA メイ の 944292 メ ス 1 94438 メ ッ 1 94432 メ ン る 9444@ 
1 る 39 DATA モ 3 94446 モ ウ タウ 9g444 ウ モク 4 94458 モ チ 2 94462 モ ツ 1 94464 モ ト 1 9446 る 5 モミ 1 》 
944 る る モラ 1 9@446 ア モン 5 9@4468 @、。 
1 る 49 DATA ヤ 8 94473 ヤ ク る  @4481 ヤ ス 1 94487 ヤ ナ 1 94488 ヤ フ 1 9448 ゥ ヤリ 1 944 ヶ 9 
1 る 59 DATA ユ る 944 ウ 1 ユイ 1 94593 ュ 2 25 94594 の 
1669 DATA ヨ る 9452 ウ ョ ウ 2 る 94535 ョ ク 7 945 る 1 ヨ ト 1 94568 4 
1679 DATA ラ 3 9456? ラ イ 4 94572 ラ ク 4 9457 る ラン 8 94589 
1 る 89 DATA リ 12 @4588 リ 2 1 94 る 96 る リッ 4 9469 アリ ヤヤ 2 94611 り 1 19 94613 り ヨ 26 94 る 23 リン 1 
1 946 る 4 の 人 @ 4 
1629 DATA ル 。 1 94629 ル イ 4 9@46 る 1 』 多 
1799 DAT レイ 1 る 42 る 65 レキ 2 94681 レ ツ 4 94683 レ ン 11 9468 ァ 
1719 DATA 口 7 94794 ロ ウ 1 る 947 了 11 ロク 5 94Z2 ァ ロン 1 94732 
1729 DATA ワウ 3 94733 ワ イィ 2 94736 フ キ 1 94738 フ ク 2 9473 ウ ワシ 1 94741 ワ タ 2 947429 ニ = 1 
| 94744 フ ヒ 1 9@4745 フ ラ 2 9474 る フン 4  @4748 
1739 DATA つつ 。1。1。2。 4 3。1。 1 3)2』4。 1 2 1。 の 。1。 1 1) の) 1。 1 き 
1749 DATA 1 1 13 つの) る 2。 1。 1。 1。 1。 1。 1。 1。 1。 1。 1。 1。 1。 1。 15 1。 1 ィ プ 
き ょ る ニー = の し 2 4 
民 紅 胃 X1WP-MAIN 
199 INITzMIDTHB9:SCREENG。9,9:CLS4:CONSOLE 9。 25: TEMPD5gg 
119 CLEAR&HFF99:DEF INT 人 Q-Z: ロ N ERROR GOUTO 4399: 日 1=4』 昌 =1 3 日 =1: 日 4 ニー1 
129 ON KEY GOUSUB 1 の ら 59,489, 2 る つ @, 3599, 35 ウ 9』 2 つ 3 1 9,395。 つの 5 ロ 。4 139,」 3 る 
139 DINM KY<〈223〉 。 DTB849) ,F 3?) 』 MC16) , FLNC44) : GSUB44 19 
149 ERT=1:OPEN" 1"。 柱 1。 "9:DQTRQ。 1" 、 
159 FOR E=9 TO223i INPUT 柱 1,KYCE) :NEXT に SW 
1 る 9 FOR E=1 TO 16z INPUT 福 1, MCE) :NEXT に 5 
179 FOR E=9 TO 43: INPUT#1。FLNCE) : NEXT 
189 LINE 9, 9) - て る 3 ヶ ,19) , PSET, 5, BCODLUR ア : ペ メニ 9: マ = タ 9sFDR E=9T ロ 4 る : TNPUT 析 1。 プ POSTTION 


| 

| X。 YsPATTERN- 1 る 6 KNJ 1 まく プ ) : バ = ベ + ク 1: IF X>4 ア 9 THEN ヤマ = ヤ + ら 9: ペ = タウ 9 

| 129 NEXTE:CLOSE 提 1:CODLORS:CFLASH1:LOCATE 1 1,29sPRINT"Hit meturn Ke ッ ュ イ OK。 "CHR も て 7 
> sCFLQASH9 
の 99 プ 和 =INKEY も : IF プ 和 ="" THEN 299 
219 IF プ ま =CHR 生 (13〉 THEN CLS:GUTD229 ELSE 299g 

| 229 MINDOM〈SB9,89) (599, 189〉 :CLS4 INDUN て ロ 」d) (る 321 の) :BEEP :ERT= ら iCOLOR イ 


。 239 POSITION299,86:PATTERN- 1 る , KANJ IT まく 3123) 。 KANJT IT も (4224) 。 KaNJTT ま て この 旨 1) 。 KANJ [まく 2 る 7 ら 8 4 
> ぅ KANJI 和 まく 3214) KAQNJT 和 (191> KNJT IT 生 て 191), KANJI 和 ま て (13 る) 。 KNJT TI まく ③1 ア > さ 
| 249 PHSITION299, 19 る PATTERN- 1 る , KQNJTT 和 ま (2 つ 921)」KQNJT TI 名 (4224) 」 KANT エ (ご の 81) , KANT 1 まく 243 ペ 0 


| 8) 。 KANJ IT 生 (451) 。 KQNJT T 和 まく 2 つう 48) 。 KNJ [まく 423) , KANJT 1 和 ま て 13 る > KaNJT IT 和 まく 318) 


259 


COLORS : LUCATE25。18』CFLSH 1 iPRINT"inPut 〈 1 ロ R 2 )":CEFLSH9g 
Fa 


Z ま =INKEY 和 も : IF ="" THEN 279 

IF も ="1"THEN CLS4:GOTQ ロ 31 9 

IF ププ 和 ま ="2"THEN GO0SUB2729 

GOT0279 

LOCRTE 9 24 = 日 は = 1 : GHSUB3 了 99: メニ 9:Y=9:BEEP 
ERT=3: 本 =" "ECOLOUR ア :GOSUB8 1 9 

KEY ON 

Z ま = INKEY 生 

IF ZZ 和 ま =" リ THEN339ELSE =QSC( プ ま ) : BEEP 


に 
さい ヽ 


『 っ 


いい の ( ' 


N】 


の 


3 る 9 GOSUB7 る 9 
37 ア 9 IF Z<32 THEN GOT0529 

389 IF も >=" " AND まく =CHR ま (255) THEN KJ=KY (ASC くま) -32 ゝ 

3 の 9 IF まま =" で " AND H5>=1 THEN KJ=TJ+1:X=Xー1:H5=9 

499 IF 2 ま ="?" AND H5=2 THEN ドリ =T イ ゴ + ジ = ペー1:H5=9 

419 IF も >=" ラ ヲリ" 人 AND 2 和 ま = く リン" THEN IF KT=1 THEN KJ も ="5"+RTGHT も で STR ま (KJ)) ご) KT=VUAL CK 
も) : 本 =KJ ELSE TJ=KJ ELSE GOTO 429 

人 429 IF まま >=" カ " QND まく =" ト " THEN H5=1 

439 IF プ ま >="N" QND まく < く =" ホリ THEN 日 = 

449 IF <" カ " DR も >" ホ リ OR (も >= リ ナリ QND プ 季 < く =" リ ノリ) THEN 日 弓 =9 
459 IF KJ=228THEN KJ=128 

4 る 9 IF >=143 人 QND フ <=154THEN GOSUB 1918 

479 GOSUBB79: IF 丁 和 まく >" "THEN ご 和 ま =LEF 丁 て 生生 、1 ) : 本 ま =MID ま (生生 , つ ) : GUTD35 9ELSE3 ら ロ 
489 IF KT=1 THEN KT=@ ELSE KT=1 

4?9 IF KT=9 THEN CL=9 ELSE CL=6 

599 LINE (6 る 25, 1) - (638, 3) , PSET, じ L , BF 

519 RETURN 

529 KEY STOP 

539 IF =1 THEN GOTO1789 

549 IF =2 THENI ※=9:GnSLUB ア プア ァ 9 

559 IF Z=5 THEN GOT02879 

5 る 9 IF = る THEN ※=X+8:GDSUB ア の 9 

579 IF Z=8 THEN ※=X-1:GOSUB タ 69@: GUDSUB 1329: IF CH=1 THEN X=X+1 
589 IF Z=? THEN GOSUB 1739 

5?9 IF Z=11 THEN X=9:Y=9 

る 99 IF =12 THEN GOT02839 

る 19 IF =13 THEN KJ=4:X1=X:GODSUBB89:X=9i IF X1 く <>32 THEN Y=Y+1 
る 29 IF =14 THEN GOSUB 1 129 

る 39 IF =15 THEN GOSUB4 189 

る 49 IF =1 る THEN GOSUB 1 る 89 

る 59 IF =17 THEN ア 729 

る る 9 IF Z=18 THEN GOSUB 1429 

る 79 “IF Z=26 THEN_ KJ=6 る 』 GUSUBB39 

る 89 IF =28 THEN X=X+1:GOUSUB7 ァ 9 

る 29 IF フ =22 THEN  ※= メ ー1:GOUSUB ア ッ 9 

ア 99 IF =39 THEN Y=Yー 1 :GDSUB ア 9 

了 ア 19 IF =31 THEN Y=Y+1:GOUSUB ア タロ GODTU ア 39 ELSE ア 3 

了 29 IF Y>=1 THEN KJ=DT て <Y- 1) 49+ メ +49BP) :GHSUEBBg し SE ビ ビビ 
ア 39 GOSUB ヶ る 9 

749 GOT0329 

759 CX=X16』CY=(Y+1) 氷 18+4 

了 769 LINE (CX』CY〉 - CCX+ 16。 CY〉 , PRESET, ア 

ア 79 し INE CX, 9) - CCX+ 1 る , 9) , PSET, 5 

7 ア 89 RETURN 

フゥ 9 IF ※X>=49 THEN X=9:Y=Y+1 

889 Y=<Y+19) MOD 19:RETURN 

819 CL=5 

829 CX=X1 る 3CY=CY+1) 氷 18+4 

839 LINE (CX,CY〉) - て CX+ 16」 CY) , PSET, CL 

849 LINE (CX, 9) - CCX+ 1 る 6, 9) , PSET, 3:RETURN 

859 GOSUB769 

869 GOT07 ヶ 9 

879 GOSUB ヶ 6 る 9 

889 CX=X1 る 』 ビ Y= (て Y+1) 水 18+5 

8?9 COLOR9:POS ITIDNCX, ヒビ Yー18:PATTERN- 1 る 』 KANT IT て 191> 

の 99 DTC<Y49+X) +499※P) = に KJ 

ヶ 19 IF KJ=9THEN GOT0 ら 59 

29 COLOR7: IF KJ く <=16 THEN COLOR4:H る =KJ ミ に ド ゴ =M (KJ) 

?39 POSITION CX,CY-18:PATTERN- 1 る , KANJ IT も (KJ) iTF HG る >=7 ア 人 ND H る <=1 る THEN PDSITION 
CX,CY-18:PATTERN- 16, KANJ 1 季 て H6+39 の ) : 昌 る =9 

?49 IF ※X=35 THEN FOR M=1TO03:NMUS 1C" り 1906C05G" NEXT 

の 59 ※= メ +1 

6 る 9 IF ※X=49 THEN X=9:Y=Y+1 

79 IF X<9 THEN X=3 の 』Y=Yー1 

289 IF Y=19 THEN Y=9@ 

の の ?9 IF Y<9@ THEN Y= ヶ 

1999 RETURN 

1919 IF Z=143 THEN KJ= ア 了 

1929 IF =153 THEN KJ=G8 

1939 IF =146 THEN KJ= ヶ 

1949 IF =152 THEN KJ=1g 

1959 IF プ =142 THEN KJ=11 

1969 IF =159 THEN KJ=12 

1979 IF =148 THEN KJ=13 

1989 IF =154 THEN KJ=14 

1 の 9 IF =147 THEN KJ=15 

1199 IF =151 THEN KJ=1 る 


1129 K=Y ポ 49+X ミ メメ = ニ X ミ YY=YEB1=9g 
IF DTX(K+499P)=g@ THEN| BE こ P iRETURN329 


> @、. 


1149 


1159 
11 る 9 
1179 
1189 
DR7 

11 タ 9 
1299 
1219 
1229 
1239 
1249 
1259 
12 る 9 
1279 
ビ H=9 
1289 
1229 
1369 
1319 
1329 
1339 


1599 
1519 
1529 
1539 
154@ 
1559 
1589 
1579 
1589 
15 ゥ 9 
1699 
1 る 1@ 
1 る 29 
1639 
1 る 49 
1 る 59 
1 る る 9 
1 る 679 
1 る 689 
1 る 9 
1?96 
1719 


1729 


173@ 
1749 
1759 
176 る 9 
1779 
1789 
17?9 
1899 
1819 
1829 
1839 


1849 
1859 


FOR 1!=K TO 3%29:』 IF DTI+489※P)+1)=9 OR DTCT+499KP> =4 ロ R DT(I+489XP>=5 THEN 


1=3?2 ELSE B1=B1+1 


NEXT 1 

K 1 = に K+B 1 : り 1 =DT(K+499 ホ PP) 』 1T ビ り 1=19g1 THEN り 1= ど ご 92 

IF ぴり 1 く <=7 THEN いり 1 =hH〈U1 > 

COLOR2 iPOS ITION XX1 る 。 (YY+1) 水 18ー135PATTERN -16」 KANJT 1 生 ( り 1 ) : ビ し = る 』 GSUB ご 9: ビ ロ レ 


=INKEY: ITF つま ="" THEN11 タ 9 

GSUB7 る 9 

IF SC(Z ま )=14 THEN 1279 

XX1 =XI YY1=Y 

IF SC( プ も) = ジウ THENI ※=Xー1 

TF SC (も) =28 THEN ※=X+1 

1=Yk49+X: IF TI<K OR I>K1 THEN BEEP = メ =XX1 3 Y=YY1 

GOSUB7 ア 9: GUSUB タ 69:GHSUBS ご 9 :G ロ TOD11 タ 9 

1 =Y49+X ミ 日 = ミエ ーK+ 1 メニ XX ミ Y=YYi TF DTC エ +499 ボ ポ P) = HR DTC エ +499 ボ ポ P〉 = THENCH=1 ELSE 


GOSUB759:FOR 11=K TO K+B1iIF CH=@ THEN KJ=DTCC11+B)+499 ポ Py ELSE KJ=9 
IF KJ=5 OR KJ=4 OUR KJ=@ THEN CH=1 

GOSUB879』NEXT1I 1 

BEEP : バ =XXi Y=YYIRETURN329 

1 =49 ボ YY+ ペ YY=Y:i ペペ = ニ ペ * ビ ロ =1 

K=DT(1I+499 水 P〉 i IF に ド =9 THEN BEEP KRKETURN 


1349 CH=9 

1359 MMHILE K く <>9: IF K=4 DR に K=5 THEN1369 ELSE K=DT( て 1I+1)+499g※P) :DT て 1+499 ホ P) =Ki エニ エキ 
1 : MEND 

1369 DTI+499XP) =9:GDSUB 1389 

1379 Y=YYiX=XX:RETURN 

1389 KJ=DT(CY4g+X) +499X※P) :GDSUBB89 

13 ヶ 9 IF KJ=9 THEN 1419 

1499 GOTQ1389 

1419 COLOR7:RETURN 

1429 K=Y49+XiXX=XEYY=YiLOCATE@。 23:PR ITNT リ ソウ ニュ ウ " 

1439 IF DTCK+499 ホ XP) =9 THENI GODT ロ 15 ヶ 9 

1449 2=9kFOR 人 Q1=X TO 3?:IF DTCCY49+ 人 1) +499 ボ PF)=9 THEN 人 Q2=Q2+ 1 
1459 NEXT 

1469 IF DTCCYX48+3?)+499P) =4 THEN 2=9iGODT ロ 148g 

1479 IF 2=9 THEN Y=Y+1:X=9:TF Y> ウ THEN 合 ら =g@ ELSE 1 

1489 LOCATE9, 23:PRINT" 1 キー ョ ウ ソウ ニュ ウ ノ ト キネ [91" 

14 の 9 LOCATE9, 24 :PR INT" ソ ウニ ュ ウ モジ シド スウ ("5 人 2 ETNPUT リ ラミ ドー イ ナイ ) "和合 


YY1 =Yi メ = ニ XXIY ア = ニ YYi GUSUB7 る 9 

IF < く 9 OR >Q2 THEN 15 タ 9 

IF 人 =9 THEN XX=9 

IF 全 =9 THEN GOSUB 1 る 19: GOTD15 ウ 9 

MINDONC8, YY※1 ヨ +5) - (る 3?』 YY1 18+21) =CLS す MINDONC9』」 9) て 3 の 」 1 の ウッ 
FOUR 【=(YY1 ポ 49+3 タ )>+499 水 P TO CCYY ポ 4B+XX)+499 ポ P)+ 台 STEP -1 
DTI) =DT て (1 エー- 台 ) 5 NEXT 

FOR 『!=CYY※498+XX)+499 ポ P 和 T 有 CCYY ポ 49+XX う +499 ポ P)+ ネ 生 ー1EDT( で EE)=1913NEX 了 
1IC=YYI 1C1=YY1:i GUSUB37 了 9 

※ メ =XXs Y=YY 6 

BEEP : GUSUB4499:RETURN3 ら 9 

財 INDOMIC9』 YY 水 18+5)ー( る 3 の 。 1 の 5) iC ビ LS4 ikMINDOMC9」9) (てら 3 の 」 1 の の ) 

FOR 1=7?? TO (CCYY+1 う 49+1499※ ポ P) STEP -1 

DTI〉) =DT(I-49) 

NEXT 

FOR 1=YYX49 TO YY ポポ 49+3 の iDT(I+499KP う =95NEXT 

1C=YY+1:G0SUB37 る 9 

RE TURN 

K=〈Y49+X)+499 ポ Pk ITF DTCK)= ロ ロ R FC>38 THEN F ビ =9iH4= ニ ー1 :BEEP iRKETURN3 ジ 
IF DTK〈K〉 く =16 THEN _H8=M(DT(K〉) ELSE H8=DT(K) 

IF DTCK〉 >=7 全 ND DT(K〉) く =1 る 6 THEN H の =DT(K〉)+39” ELSE H タ =9 

IF H4=-1 OR H4+1 く >K THEN FOR Z=9 TO 3ZIF(I)=BINEXTILUCRTE9。23:PRINTEPRINTI に E 


DLOR る iPOS ITION 9,183:PQTTERN- 1 る ら ょ KANJ 1 まで H8) 』 KQNJT 1 まま (H の う ii ビ (> =DTCK) iF ビ = ニ 95H4= ニ Ki ペ ニ ペ + 1 
5 TK=1 る iCOLOR ア 7:RETURN 


COLOR る 』POS ITION TK』」183』PATTERN- 1 る ,KQNJT 1 まく HB) 』K 全 NT 1 事 で (HH) 日 4=K ド :F ビ = ニ ビ ヒビ +1 5F(F ビ ) = 


DTC(K〉 : メ =X+ 1 : TK=TK+16 る iCEODLDR7 了 IKETURN 


GOSUB759iFOR 1=1 TO 8 

K=〈(Y ポ 49+X)+499 ポ Ps IF DT(K)=9 THEN KJ=191 ELSE KJ=DTXK) 
50SUB879: IF X ト MD 8=g THEN 1=B 

NEXT 

RETURN329 

BUSUB75S9: ペ = ェ 9: YY= ニ Yi 向 ど = ニ 9: 仙 3= ニ ロ 


FDR 内 1=9 TO 32: IF DTCCY ポ 4 ロ B+ 全 1)+49g ポ P) く > THEN| 3= ヨ + 1 

NEXT*』 谷 コ = ニキ 9 人 各 3! ま ベベ ニオ ロー 

IF 人 2 くら 2 0UR 2Z=49 THEN GOUTO1869 

INDOMC9』 YY 水 18+5 う て る 3 ァ 』 YY ポ 18+122 う EELS4 iMINDOMCB」 2) 63 の 。 1 の の ) 
GUSUB7 プ 59: バニ =X ペ + 向 と \ ど * FR 合 1 =49- 全 2 TH 9 STEP -1iDTCCYY4 ロ +X)+4 ポ P) =DT CCYY ポ 9+ 


合 1)+499 光 P) メニ = メー1 3NEXT 


メ =9:FUR Q1=9 TO Q2\2ー13DTCCYY ポ 49+X)+499 ポ PP)=1911X= ニ X+1iNEXT 
1 ヒビ =YYE IT ビ 1=YYIGOSUB3779 


ンー 


SN 。 


18 る 9 GOT0O149 
1879 GOSUB759: YY=Yi 人 2=9:Q3=9 
1889 IF DTKXYY49+3?)+499※P) く >9_OR DTcKYYx4g)+46@*P) =@ THEN X=9:Y=Y+1:BEEP : GUT ロ 3 
29 
18?9 MINDOMMC9。 YY ポ 18+5) - (632』 YY ポ 18+ ご 2) iCLS4: INDOM て の) 9) (6 ら 3 の 。 1 ウタ) 
1 ら 299 GOSUB759!X=3?iFOR 合 1=32 TO 9 STEP -1:IF DTC(YY49+ 合 1)+499P) く >9 THEN DTCXKYY 
4 9+X) +499 ポ P) =DT(CYY4 9+ 各 1) +499※P ) : 仙 2 = 人 向 + 1 5 バニ メー1 
1 ら 19 NEXT:X=@ 
1 の 29 人 Q3=3 ウ -Q2iFOUR 内 1=9 TO 3iDT(CYY ポ 49+X) +499 ポ P) =191: メニ メ + 1 NEXT 
1 め 39 1! じ =YYi 1C1=YY: BUSUB377 了 9 
1 の 49 X=9 ミ Y=YY+1:BEEP : GUSUB タ る 8: GUTU329 
1 め 59 KEY STOP iCOLOR6: GODSUB4499:FUR 1!=9 TO 19iK1(1〉=191iNEXTIPUSITION5, 183: PTTER 
N- 1 る KANJT 1 ま (2933) , KANJ 1 まま (27 ウ 9) , KNJ IT て 28 13) 。 KANJ 1 全て (どの 981) KNJT 1 あく 384 1 ) 。 KANJT T ま (4 る 3 
> ICOLOR7 iLOCATE 14,24: INPUT 伯 ま 
1 る 9 IF LEFT 第 (和合 和 ま 。1)="+"THEN GOUTO2329 
1 の 279 IF LEFT ま も ( 缶 和 あ 。1) く "アリ" DR LEFT 和 まく ( 合 季 。1) >" ワ ウリ" THEN CLS:BEEP : GUHSUB4499:RETURN329 
.1 ぢ 89 IF LENK< 人 Q 和 ま > >2 THEN GUTO2329 
1 の 29 XX メ =X ミ YY=Yi 人 1=9 
の 999 1=1iIF LEN〈 人 Q 和 も )=9 THEN1 タ 59 
2919 IF LEN〈( 人 Q 和 も) =1 THEN じ =QSC (和合 和 ま > : GUTO2 939 
ら 929 じ =QSC (LEFTT ま (谷本 。1))+ 和 SC CR TGBHT 季 〈( 合 季 。1) ) 
ら 2939 OPEN"R"」 柏 1。 "18KaNJI" 
の 2949 FIELD 村 1, 255QS BB も:GET 村 1, 人 SC ( 谷 和 )-176』CLOUSE 失 1 
2959 B1=INSTR (CB まま 全 和 ま >): IF B1=9 THEN GOUSUB4499:GHT0U2329 
の 9 る 9 = ト HID ま (生日 1+ づ ウッ > 
2979 じ 3= い aaL (LEF 丁 生日 本 , 3) ) 』 昌 アニ リ UL CR 16HT (日 6) ) 
2989 IF C3=1 THEN KJ ゴ =H7 ア :GUSUB4499: GOUSUB ア 759: GOUSUBB7 ア 9: RETURN コ 29 
ら 299 昌和 ま =RIGH 丁 季 〈STR 和 ま (H ア ) 。4) : MX= り AL (し EF 丁字 日 生ま, ご)+" 9" う + ツ 5 
どら 199 CC ヒ =9: ビ H=9: 1=9 
@119 != エ +1 
2129 KJ=H7ー1+Ii IF KJ>=N 全 X THEN CC=1 
ら 139 IF KJ>= ト MAX+ タ 6 THEN じじ = ら 2 
| ら 149 IF CC=1 THEN K ゴ =KJ+ ら 
| の 2159 IF ヒ C=2 THEN に K ゴ =K ゴ +19 る 6 
2169 GOUSUB2279: ビ H=13 IF 1 ト OD 19=g OUR 1= ヒ 3 THENI ビ H=9: 1C ロ =1 MOD 1giTF 1 ヒビ H=9g THEN 1 
| CH = 19:GOSUB ご 19 ELSE GODSUB ご 1 ツ 9 


21 ア 9 1F 1=C3 人 QND SC て (人 Q 和 も) =13 THEN NMUS 1C" り 1 9 ロ る ビ ロ は " :GHT ロ 2 199 
の 2189 CC=9: IF 1 く <C3 THEN2119 
の 1 の 9 台 和 =INKEY も : ITF 生ま ="" THEN2 1 の 
2299 IF SC〈( 人 も )=13 THEN RETURN 
2219 IF SC( 人 も) =4 る THEN 1=1-1ICH-19gEiIF 1< く 9 THEN 1=FIX(C3〆Z19) 炒 195 ト US EE"U1 06COHSG "5 
IF 1=C3 THEN 1=I-19 
2229 IF SC〈 台 > =46 THEN RETURN 
どら 39 IF 下 和 =" ! THEN K ゴ = ご 2 : GT ロロ ビジ ら 9 
| の 249 IF SC て (谷本 > く 48 OUR の SC 〈 谷 季 ) >5 プ THEN 21 アァ 9 
2259 KJ ゴ =K 1 (UL <〈 谷 字 ) ) 
ら 2 る 9 GOSUB4499:Y=YY:iX=XXiGHSUB75g:GHSUBB79:RETLURN ラ どの 
2279 IF CH=9 THEN GOUSUB22 ァ 9:PODSITI ロ N5』」183:PRTTERN- 1 る 6, KaNTI ま (191) KNJ IT まま (KJ) EsK1(9 
| >=KJi TI1=1iRETURN 
| 2289 PATTERN- 1 る KANTI ま (191),KaANTI も (KT) IKE て IT1)=KJTiT1=I1+1IRETURN 
22929 CULDR2kLOCATE9, 23:PRINTSTR 1NG ま (42。 リリ "51E3KEICEHULURS ら IL ロビ RTE9 ご 4:iFHR F=9 TH ウ iP 
RINT FiSPC〈1〉 isNEXTECOLOR2 PRINT" "iTF 1>=FIX(C3/19) 水 19 THEN PRINT C3』 ELSE PR 
INT1+ タ ョ ュ 
2399 COULOR る iRETURN 
2319 KEY STOP:COLOR る iPOSITION9。 1835PATTERN- 1 る ぅ KaNJ 1T ま (3517) 。 KANJT 1 まく 24 7 る) K 全 NT 1 字 (1 
9 る 6) , KaQNJ 1 まま (3527) , KANJT 1 本 (4 ご 24) 。 KaNJT 1 も (142) 。 KaNJT 1 まく 1 る 9) 。 KaNJT 【 季 て 136) 。 KaNJT 和 も て (143) ょ K 台 
ト J 1! 季 (28 13) , KaNJ IT ま (2 の 81) iCULUR7 LU ロビ TE2 つ 4。 どら 4 : 全 も = リリ ETNPUT "ヨミ リョ 本 5GBUSUB44g89i ITF 内 季 = リ リ 
THEN RETURN329 
2329 IF 人 SC( 内 も ) >=2 ら 1 HR ASC( 人 生ま) く =176 THEN IF SC( 伯 まう) く >9 コ THEN BEEP iRETURN329 
2339 IF LEN<〈 谷 和 も ) く 1THEN BEEPIRETURN329 
2349 IF SC て (人 Q 和 も >) =43 THEN F1=1: 合 1 ま =MID ま くま ご ) 5 YY イニ YE X ペ = ニ X5 BHTU2429 
2359 YY=YiX メ = ェ メ ミ F= ニ FLN (人 QS ビ てく 谷本 うー17 プ る) 人 向 1 生 = ト MID て 向 ま 。 ご > 
の 369 IF LEN〈 全 多 >=1 THEN 向 1= 販 も 
| 2379 IF GSC〈( 全 1 多 ) く 177 OUR SC て ( 台 1 和 も ) > つら 1 THEN- F i =45: G ロ TO2 ら 3 ヶ 9 
| 2389 F1=QSC( 谷 1 李 )-1 プ 6k IF F=1 THEN F1=1iGOUT ロ ご 4 ど 9 
23%9 FOR !=1 TOF 
2499 IF F1<=1 水 45\F) THEN F1=1i1=FiNEXTIGUT ロ 2429 
2419 NEXTIF1=F 
2429 人 Q1 ま =MID ま (STR 季 (LEN <〈 谷 季 ) ) , ご ) + 販 
2439 OPEN"R"。 欄 1。 11 ゴリ ォ し LEFT 和 て 生ま 。1 う + ら ST 多く F 1) 
2449 IF LOFC(1)=9 THEN PRINT:iBEEP:CLOSE 析 1: RKETURN329 
2459 1!=9 
ら 24 る 9 1=】 ォ 1 
ら 2479 FIELD 持 1,255 人 S J ま 
2489 GET 村 1。 1! IN=INSTR (まま 。 合 1 ま う 
24 ヶ 9 IF IN<>9THEN GOSUBS5 19 
2599 IF 1<LOF〈1) THEN24 る 9 ELSE に CLOSE 杜 1:Y=YYi X= ニ XX』 ゴ 字 ニ "リュ 丁字 = ニ R TG ロ 生ま て 伯 和 も 」。1 う +T ま * 同和 ま = し ビビ 
和 て 和 各 , LEN (生生) 1) iGUT ロ 2339 
2519 L=LEN〈 人 1 まま) : 地 =MID( 二 ま 。1N+ し う 
2529 IN2=INSTR (J 和 。 "UM ) ENT も =MID ま て 本 季 。1。 1Nー1) 本 =TD 凶 て (本 ま 。TNE+3) gL1=LEN KNJ 生 ) 


NW 


742 の ohicCz 1983.10 
SN NN 


に コ 


6 凍 5 7 


2539 GOSUB759iFUR 1I1=1 T ロ し L1 STEP2 
2549 K 了 = ヒ り 1I (LEFT 和 ま て NJ 和 ま 』 ご) ) NT まま = ト 人 TD 和 ま (N ば まま 。 3) :GBHSUBB 了 g 

2559 NEXTIi1 

ら 2529 LOCATE25,24:CFLASH1:iPRINT "Hit return Ke ッ 1 ュ T ロ K、 "ミミ ビ FL 合 SH 

ら 579 IN 和 も =INKEY 和 も 5 ITF 1TN ま = リリ" THEN2579 

2589 GOSUB4499: IF SC(IN ま も ) =13 THEN CLOSE 拉 31『 ゴ 名 = リリ iTF 丁 季 く > リ リ 征 HEN も = し LEFT 宇和 T 各 。 1) 本 
ま =MID ま ( 和 T ま ,2> iRETURN3S9 ELSE RETURNIG2g 

2599 PRINT:GOUSUB759! X=XXIY=YYiFOR I1=1 TO L1 STEP2:KT=9IGHSUBB79INEXTIX= ニ XX で =YYE 
GOSUB8 1 9 

ら 2 る 699 IF 人 QSC(IN 和 も) =27 THEN CLOSE##1:BEEP iRETURN329 

2 る 19 IN=INSTR (J ま 和合 1 ま > iTF IN く > ロ 9 THEN2G51 9 ELSE_ RETURN ご 599 

2 る 29 KEY〈3〉STOP : GUSUB4499: し ロビ ATE9。24:PR INT "コー トド NGO。 [or RETURN Ke ッ ] "3 TINPUT プ 入 * 
に K ゴ = いり aQL (LEF 丁 和 ま くま 。 4) ) 

ら 2 る 239 GUSUB ア 759: GOUSUB ヨ 7 ア 9』i GOSUE4499:RETURN3 る 8 

2 る 49 LOUCATE9, ご 3: INPUT"input fi name" ョ マキ ま 

2 る 659 nPEN" ロ "』 手 1。 "5 リ ォ ブン ま +"。KMP "ELOUCRTEg。 23:PR INT "SUE "4 CHR 和 ま ( づ 4) 』 プ 』 
CHR ま も (34)iFOUR 1=9 TO 7 タタ ァ 

ら 669 PRINT##1,DTC(1I> 

2 る 79 IF DTI!I)=5 THEN 1=79 ァ 

どる 89 NEXT 

どら る の 9 PW ほ NT 林 1』 晶 1, 日 IN:F 1 ネネ = ニン 和 ま : じ LUSE 林 1 

2799 IF FNM=1 THEN RETURN 

2719 RETURN3889 

2729 CLS4:CULUR4:FILES "gk "sgCOLUR ア :L ロ OCRTE 9。 24: TINPUT"input 地 i1 name"iFT1 ま :L ロ EATEg 
ぅ どき 

2739 H3=1iPRINT"LORD "CEHR も (34) 5F TI 1 本 CHR ま (34 う 

ど 749 CH=9iOPEN" 1 "。 析 1。 "コミ"+ ォ FT1 ま +"。KLMIP" IFUR 1=9 T ロ アァ 

2759 IE.、CH=1 THEN DTI)=9:GHT278Gg 

27 る 9 1NPUT 柱 1,DTKCI) 

ら 779 IF DTC〈1〉 =5 THEN CH=1 

2789 NEXT:CH=9 

の 7 アウ 9 INPUT 村 1, 日 1。 昌 ご 。 1 ト HE CLOSE 持 1:FT 季 =FT1 生 : ITF FM=1 THEN FNM=9:GOTU 2899 ELSE RETURN ら 2 
829 

2899 CLS4 : GUSUB3 了 99』 LODCATE9, ど 4 : 1 ビ = ニ GUSU 日 コア る 9 

2819 X=9:Y=g:BEEP:RETURN329 

ら 2829 GOUSUB38 る 9 

2839 LOCATE9。24: INPUT "RT ほ = you sume で [ ッ ] リョン: TF つも く > リ YU aaND ま <>" ッ リ THEN GHSUB4 
499: GUTO329 

2849 IF P=9 THEN FOR 1=9 TO 3 ァ タ DTC1T)=DT(I+T48B) ED て エ +4 ロ 9) =9iNEXT:CLS4 1 G ロ SU コア 99* 
1C=9: GUSUB3 了 7 る 6 る 9: GUTD28 る 9 

2859 FOR TI=9 TU 3? ァ iDT(T+499〉)=d:NEXT: ヒ ELS4 : GUSUB コ ア 99 

286 る 9 ※=9:Y=9:BEEP :GDTD329 

2879 X メ =X ミ YY=YiEL し =4 ロ ーX: IF XX= ロ THEN 28 ァ 9 ELSE FOR 1=1 TO ELiKJT=g:GUSUBB89:NEXT 
どら 889 ※X=XX: Y=YYiBEEP : GODT0329 

ら 8 ヶ 9 MMINDOMC8。 YY 水 1B+5) (る 3 ウ 2。 1 ウツ ) :CLS4 skMIND ロ CB。9) 一 て る ら コタ 。1 タ ツア) 

の?99 FOR 1=(KYY+1) う 49+49 ロ ホホ P) TO 849 

ら 2?19 DTK〈1I-49) =DTK(1) igNEXTI 1 ヒビ =YY:G ロ SUB コ 3 コア る 9 : G ロ TH2B89 

ら 2?29 LOCATE9,23:PRINT"fi1e "5CHR 和 (34) 』F エ 生ま 5CHR も (34 う ミリ コウ シン 【[Y or N] "ミミ ブン まま =INKEY ま ま i 
IF も ="" THEN2 タ 29 

2 の 39 IF プ ま ="Y" THEN 2249 ELSE CLS4 :GOUTD388g 

ら 2249 KILL"9i"+ ォ F1 和 ま +"。 KMP "GUSUB2 る 59 

2?59 KEY〈8〉)STOP : KJ=5:GUSUB7 プ 59: GOSUBB ア 9: メ =9iY=9:RETURN329 

2 る 9 LOCQTE9,23:PRINT"Ki11 [Y or N] "ンプ ネ =INKEY 和 まま: IF まま ="Y" THEN 2 ウタ 9 

の の 7 了 9 IF プ 和 ま ="N" THEN GOT038889 

の 2 ヶ 89 GOUTO2? る 9 

@? の 9 CLS4:COLOR4:FILES" 9: "iCEOLOR ア iLOCRTE 9』 3: INPUT "inpPut 1 name "si 谷 

3999 LOCATE9,24:PRINT"sumre 2 [Y or N] "ii 合 1 和 ま =INKEY も : IF 全 1 和 ま = リ Y" THEN3939 

3919 IF 人 Q1 和 ま ="N" THEN GOUTO3889 

3929 GOT03999 

3939 KILL" 9"+ 仙 生ま +"。KLIP " 

3949 RETURN3889 

3959 KEY STOP: IF DTKCY ポ 4 ロ +X)+499 ポ P〉)=9 THENI BEEP : RETURNG2 

396 る 9 COLOR2』POS ITI0N9。183:PATTERN- 1 る KANJT 1 和 ま 〈35 1 プア) 。 KNTT ま (2 つ 4 了 る ) 。 KNTT 和 まく (19 る ) , KNJ 
生 て 3527) 。 KNJ [生ま (4224) KONJT TI まく 142) , KNJT IT ま (1 る 9) ょ KN TI 和 まく 13 る ) 』 KNT IT ま て 143) 』」 KaNJT [まく コア 48 
うぅ KANJT 和 も (4731) : CDLOR ア iLUCRTE25) 24 :i INPUT "ヨミ " ョ 仙 ま : IF 台 和 ま ="" THEN RETURN3 ら 2 

3979 IF LENX( 人 Q 和 も ) > ウ THEN GOT039 る 9 

3989 IF SC て (人 Q 和 ま ) >=221 OR SC (まう) く =17 る 6 THEN IF SC( 人 まま ) く >43 THEN BEEP:RETURN329 
39?9 GUSUB4499 

う 3199 LOCTE25, 24 :PR INTCHR 和 (34 ) 』 人 本 5 CHR 和 ま (34) 5 "Hit return Ke ンー ュ イ UK。 "3 は 谷 1 季 =INKEY ま 1 
F 人 Q1 和 ま =" "THEN3 199 

3119 CLSsi IF SC〈( 人 Q1 和 ま >=13 THEN GOT ロ 3 139 

3129 RETURN329 

3139 IF ASC(Q も > =43 THEN 人 Q1 ま =MID ま (て 仙 生 。2) jiF1=1 GOUT ロ 3219 

3149 F=FLN(RSC (人 向 和 ま ) -176) 5 合 1 和 ま =MITD ま も てく 人 の) 

3159 IF LEN〈( 人 >=1 THEN 向 1 全 = 人 を 

316 る 9 IF SC(Q1 和 まう) く 177 OR ASC(R1 ま > >22 1 THEN F1=45:GBUT ロ 3189 

3179 F1=QSC (人 Q1 和 まう 17 る IF F=1 THEN F1=1:GDT ロ 3219 

3189 FOR !I=1 TO ロ F 

う 31 の 9 IF F1 く <=1I 水 <45\F)THEN Fi1=IsT=Fi ト NEXT GOTO3219 

3299 NEXTkF1=F ビ 


( が ( 4 区 
WS きぐ CN 


ぎ つ 


NO 


電 の 


32 19 TK=21 :NJ 和 = 人 Q 生 *COLOR5 POS IION5) 183:PRTTERN- 1 る ぅ KANJ 1 まく 152 ぅ 
3229 IF DTK〈Y49+X)+499※P〉 =9THEN COLOR5S:POS ITION TK, 183:PATTERN- 16 KNJ1 多 (153) : ビ 
ロ LOR7 : GUT03279 

3239 KJ=DT〈〈YX49+X) +499P) iCOLOR9:POS ITION TK」183:PATTERN- 1 る ぅ KNJ 1 ま ( の 93) : COLURG* 
POS1ITION TK, 183:PRTTERN- 1 る KANJI も (KJ 了 ) : TK=TK+16』 IF TK>=5 タ ァ 7THEN TK=5 

3249 NJ ま =NJ ま +MK iT て K 耳 ) 

3259 GOUSUB759: GUSUB の 59 

3269 GOUTO3229 

3279 NJ ま =MID も (STR 和 も (LEN て 谷 和 ) ) ) 2) +N ト け ま 

3289 OPEN"R"』 村 15 "7189 リ + リ ゴリ +LEFT 和 ま ( 谷 和 ま 。1) TSTR 和 も (F 1) 

32?9 FIELD 手 1,255AS も 

3399 IF LOF(1)=gTHEN CLOSE 1 : GHTU3359 

3319 1=9 

3329 1=1+1 

3339 GET 桂 1。1I TIN=INSTR (も ぅ NT まう 5 IF IN く >9 THEN LOCATE 9 24 : BEEP iPR INT "トウ ロク スミ "siFOR 征 = 
9 TO 1999:NEXT:CLOUSE 柱 1: 本 季 =" "3GOUSUB4499:RETURN は 29 

3349 IF 1I<LOF〈1〉 THEN3329 ELSE CLOSE 1 

3359 GOSUB4499:BEEP :LUCATE25。 24: INPUT" EY or N]" ミ プ ま 

33269 LOCTE9 ご 3 

3379 IF まま ="Y!THEN 3389 ELSE BEEP :GUSUB4489:RETURN329 

3389 NJ1 も =" "UPEN"R"」 拉 1。 リ 18 リ オリゴ リ +LEFTT ま ( 仙 多 」1) +STR ま (F 1) 

33 ヶ 9 FIELD 桁 1,255S J 

3499 IF LOFK(1)=9 THEN L=9: 和 ま =" "EGOUTO3439g 

3419 GET 柏 1。LOUF て 1) 3 1N=INSTR (まあ 。 "XY プ " ) 本 季 =MID 凶 (本 生 。1。 TN-1) 

3429 L=LEN(J ま も) 

3439 NJ=NJ 季 + す "UM" EL し ど =LEN (NT う 

3449 IF L+L2>252 THEN 3489 

3459 FIELD 村 1,L 人 QS 1 まま , し 2+3 人 QS 2 名 

346 る 9 LSET 了 二 1 も =J ま 5LSET JJ2 ま =NJ+ "XYZ"gIF LOF(15 く > THEN RC=LOF (1) ELSE RC=1 

3479 PUT 村 1, RCIGOUT034 タ 9 

3489 FIELD#1,255 人 AS J 了 1 まま iLSET 1 まま =NJ 和 まま + "XY プリ" ョ PUT 析 1。LHF (1)+1 

34 ヶ 9 CLOSE 本 1:BEEP = リリ "ミュ ゴ 1 まま = リリ ミ ゴ 2 ま =" "GUSUB4499:RETURN329 

3599 “ 

3519 COLOR る iPOSTITIUNB。183:PATTERN- 1 る ぅ KNJT 1 まく (2 ア 7) , KANJ 1 季 で 583) , KGNJ 1 まく きき 1 』 KANJT 1 季 て 
574> KNJT 1 まま (583) ぅ ) K 人 NTT 和 も (5 1 る 6) , KNJ IT まく 142) , KNJT 1 まく 335) 。 KAN エ T 季 て 143) KANJT 季 て 191) KN 
JI て 1796)〉 , KaNJ 1 まく 472) 。 KANJ IT 凶 (427) KANJ TI て 142) , KNJ [本 (359〉) , KQNJ IT 和 まく て 143) KANJ IT まく (191 
) ょ KaNJT IT ま (4293) 

3529 PATTERN- 16, KANJ 1 事 く 2844) , KAN 1 て (142) ) KNJT 1 まく 336) , KNT TI 和 ま て (143) iCULUR7 : 伯 ま =INKEY 
も iTF 台本 =" "THEN35 19 

3539 IF 台 和 ま ="C" UR 生生 ="C" OUR 生ま = リ ソリ THEN GOSUB4499:RETURN1789 

3549 IF 台本 ="R" OR 人 本 =" リ r リ " UR 人 まま = リス "THEN GHSUB4499:iRETURN1879 

3559 IF 台本 ="D" OR 向 和 ま =" リ コリ OR 生ま = リ シ "THEN GUSUB4499:RETURN35 了 9 

35 る 9 GOSUB4499:RETURN329 

3579 IF F(9〉=@ THEN BEEP :GOTQ329 

3589 FOR 1I=9 TO FC:K ゴ =F(I) :GHSUB ア 59: GUSUBS79:NEXTiH4=-1:GUTO329 

35 ヶ 9 】F P=9THEN P=1 ELSE P=@ 

3699 CLS4:KEY(5) NEKEY(19) ロ NE GUSUB37 99 

3619 IF P=1 全 ND DT〈499〉)=9 THEN IF DT(369〉 く >9 THEN _ COLOR る Si TK=9: GUSUB3659 

3629 IF DTC(499 ポ P) =9THEN3649 

3 る 39 1 ヒビ =9:G ロ SUB3769 

3249 ※=9:Y=9:BEEP :GODSUB4499:RETURN329 

3259 FOR 1=36g TO 3 タタ 』sH8=DTKI) 

3 る 6 る 9 IF HB8 く <=16THEN H ウ =H8 : HB ヨ =NM〈H8> 

3379 PdGSiTIOUN TK, 183:PATTERN- 16, KANT IT まく H8) : IF ロウ >= ア 人 ND H タ <=1 る 6 THEN _ POSITION TK 
183: KANJ 1 まま (H ウ + コ 9 アツ ) :H ウ =9 

3689 TK=TK+16 

3 る 6 る の 9 NEXTIRETURN 

3799 LINE (9,」@) (63 タ 。 9) 。 PSET, 5 

3719 LINE(9。1)-(16 る 水 (P+1)。3)。PSET。 1.BF 

3729 K=9:FOR S=@ TO 49 

3739 KK=1:iIF S MOD19=9THEN KK=3ELSE IF S MODS=9THEN KK=2 

3749 LINE(K, 9 ぅ KK KK〉 。 PSET, 5: に =K+16iNEXT 

3759 GOSUB4 ヶ 9:RETURN 

3769 1IC1= ウ の 

3779 IF IiC> タ THEN RETURN ELSE FOR =IC TO 1IC1 

3789 COLOR7 

37?9 TK=giFOR 11=9TO3 ウ COLOR7 ア ミリ 2=DT(C1I1+I ホ 49)+499P) 

3899 1IF いり 2<=16 THEN COLOR4 : 日 は = いり 2 : り ソコ =N て いら うぅ 

3819 PO0SITION TK。 1i18+5 ら PATTERN- 1 る ぅ KNJ ! 季 (くい 2) :i IF HB>=7 人 ND H8 く <=16THEN PQSITION T 
K』I18+5 ょ PTTERN- 1 る ら ぅ KaNJ [本 (HB+39 ヶ ) :HB=9 

3829 TK=TK+1 る 』 TF り 2=213 OR い 2= ら 11 OR いり 2=9THEN 1 1=3 ヶ 

3839 NEXTI1 

3849 NEXTI 

3859 BEEP:RETURN 

づら 69 KEYC19〉STOP : IF 日 3 ヨ =1THEN GOSUB3889ELSE 日 3=1:RETURN3879 

3879 P=1:GOSUB35?9 ヽ 

3889 KEY STQOP 

3829 CLS4 :H コ =9:P=9:ERT=4 : じ し =5 

3 ヶ 299 LINE(279。19〉-ー〈(41 の 。 174),PSET。 1B 

3 ゥ 19 GOSUB4949:GOUSUB4959:GOSUB4 ロ 6 る 9:GUSUB4979:GUSUB4989:GHSUB49 タ 98iGUSUB4 199: BUSUB 


4119 

3229 COLOR7 BEEP 

3?39 KEY〈(19>0N:SCREEN9。 9。 9 

3249 の も =INKEY 和 まま: TF 合 季 =" "THEN3 タ 39 

3 の 259 IF の も ="9"THEN GOSUB3869 

3 の 69 IF 内 ま ="1"THEN CL=6』GOSUB4959: GUSUB2 る 49 

3279 IF 生ま ="2"THEN CL=6iGOSUB4969iLOCATE49,24IPRINT"[Y or N]1 "ii TIN ま =INKEY も も: IF IN ま 
=" "THEN3?79ELSE IF IN も く >"Y"THEN3889ELSE CLS4:iFOR 1=9 TO7 タ の IDT(I)=9iNEXTIH1=4:H2= 
1: IM=9IRETURN3 1 9 

3?89 IF も ="3"THEN GOUSUB2729 

コウ 9 IF 人 Q ま ="4"THEN CL = る:GOSUB4989: GODSUB4 1 どら 9 

4999 1F の まま =""THEN C し =o: 台 和 =F 1 本 : GUSUB49 ア 9: IF FI 本 =" "THEN は 3889ELSE GOUSUB2 の る 29 

4919 IF まま =" る "THEN CL し =6:GOSUB4 199:』 GODSUB2 ァ る 9 

4929 IF 台 生 =" ア "THEN CL=6iGOSUB4119:iLOCATE49,23! INPUT "Sume 2 上 Y] "人 も: TF 生生 く >"Y"THEN 
GOTQ ロ 3889 ELSE CLS4 1CONSOLE9,25:KEY OFF ICOLOR7 ア IEND 

4839 GUTO3889 

4649 COLOR CLIPOS ITION275, 14 iPATTERN- 16」 KANJ 1 まま (5 る 6) ) KNJ I 和 ま (122) , KANJT IT ま (54 1) 』 KaNJ 

1 も (3258) , KANJT 1 も (2925) , KANJ IT 和 ま (191) KNJI 和 も (191) , KANJT ま (132) , KANJTI ま (316) : CULOR7 iRET 
URN 

4959 COLOR CLiPUSITION275,34 :PATTERN- 1 8, KNJT [まく 3 123) 。 KANJI まく 4224) 。 KQNJ 1 まく ど の 81) ょ に 
NT I 季 44 る) , KANJT IT 和 まく 4261) , KANJTI 和 (3424) KaNJI ま (191)。KQNJI ま (136) 。 KANJT IT 和 まく 317) : COLOR ア 7! 
RETURN 

4929 COLOR CLIPOS ITION275,54 iPATTERN- 16, KaNJ 1 和 ま (くさ 123) , KNJT 1 まく 4224) KNT IT 和 まく 2 の 81) に K 
QNJ IT ま (2678) , KANJ IT 和 まま (3214) KNJ IT ま (191),KANJ IT まま (191) KNJ 1 も (136) , KNTI ま (318) iCOLUR7* 
RE TURN 

4879 COLOR CLIPOSITION275, 74 iPRTTERN- 1 る 6 KANJ IT 本 ( ら 9 1) , KANJ 1 和 ま (4224) , KANJI 和 も (2281)K 
RRNJ 1I ま (2438) , KANJT 1I 和 ま (451) , KANJT 1I 多 (2 の 48) , KQNJT IT 和 ま (423) , KANJI 和 ま (136) , KANJ 1 生ま (31 の 2) kCOLDR7* 
RE TURN 

4989 COLOR CLIPOSITION275」 の 4:PATTERN- 16 ょ KANJ IT 本 て 1685) , KNJT 1 まく の る 24) KANJT IT 和 まく 191)K 人 Q 
NJI ま (191),KaNJI も (1915, KANJI まく 191) KANJI 和 まま (191) KANJ IT 和 まく 136) , KNJ IT 和 まま (329) 5 COLOR7 RET 
URN 

4929 COLOR CLIP0SITION275。114:PATTERN- 1 る 6, KANJ 1 まで 4224) , KQNJ 1 まく 2281) KANJ IT 和 ま (44 る ) に K 
人 QNJ 1 まく 2525) , KNJ IT 和 ま (《③3123) , KANJ IT ま (191) ,KQNJI ま (191),KANJI 和 て (13 る) , KANT まく 32 1) COLOR7 
RE TURN 

4199 CULOR CLIP ロ SITION275, 134 :PATTERN- 1 る KANJ IT ま (4385) , KANJ 1 生ま (③935) , KNJT IT 生ま (191)』K 
人 NJI ま (191) KNJTI 和 まま (191),KANJI ま (191)」KaNJ IT も (191)」KQANJI 和 ま (13 る ) , KANJTI 和 ま (322) : COLOR7*RE 
TURN 

4119 COLOR CLIPODS1ITIONZ2 5,154:PQTTERN- 1 る 6, KQNJ 1 凶 (2 う 19) 。 KNJ IT 和 ま て 4627) 』 KNTI 和 まく 191)。K 
人 NTJI ま (191) KANJ IT ま (191 う KNJTIT ま (191) KNJTI ま (191) KANTI ま (132) , KANJT IT 和 ま (323) : COLUR7 了 *RE 
TURN 

4129 RETURNI: “PR INTER 

4139 RETURNI FORMAT “KEY(?)STOP 

4149 “IF LEFT ま も (F IT ま , 1) ="F"THEN53 ヶ 中 

34159 “BEEP:BEEP iRETURN289 

41 る 9 “P=giFM=1:GOUSUB2 る 99: GOSUB2 ア 99 

4179 RETURNI CRLCULTE 

4189 IF ※X く >gTHEN BEEPi GOSUB4499:RETURNS る 9 

419 LOCATE9,24:PRINT" 1 ら に 0 

4299 LINE(9,Y ポ 18+5) - (63 ヶ 。 Y ポ 18+2 1 ) 。 PSET。 9 BF 

94219 LINE(16, 1 の 99) (48。129) , PSET, る 

4229 LINE(B9,」129) (1 12,19) , PSET, る iL INE (89, 1 の 2) (1 12」 1 の ら ) , PSET。 る 

4239 LINE(144,1 の 9) - て 176。192) , PSET, 6 BF 

4249 生生 =INKEY 和 iTF 人 生ま =" "THEN4249 

人 4259 IF 台 和 ="1" OR 仙 生 =" の 2" OR 仙 和 ま ="3"THEN 人 向 = り 人 QL (も ) : GUTH4269 ELSE 4249 

4269 1=〈(Y ポ 49+X ぅ >+499 ポ PiFDR TI1=1I TO I+37iDT(1I1)=122iNEXT 

4279 DTK〈1+38) = 全 + 了 IDT( エ +3 タ 2) =4 1 1 ヒビ =Yi 1 ビ 1=YE GUSUB37 了 9 

4289 X=9iY=Y+1 

4229 BEEP:GHSUB4499:RETURN329 

4399 LUCATE9, 23』COLOR ア 

4319 ERR=7 THEN X=XXIY=YYiCLS:iGOT ロ 4388 

4329 ERR = る 5THEN CLS:PRINT "ff: メイ / カキ カタ カ ^ チカ ~ イ マス " :BEEP : GDTD4389 

4339 ERR =53THEN CLS:PRINT"file not found ":BEEP :GHT ロ 438@ 

4349 ERR =5Z7THEN CLS:PRINT"fi1= a1mead コ ッ exists":BEEP : GDT04389 

4359 ERR= る 9THEN CLSEPRINT" コ ュ sK fu11":BEEP GUT ロ 438@g 

43 る 9 ERR=73THEN CLSIPRINT" コ isK off] ine":BEEPiGOT04389 

4379 CLSIPRINT"error No。= "iaERRi" "ERLiEBEEP 

4389 PRINT"hit any Key"iiIF INKEY ま (1)=" "THEN CLSiGOTOD4389 ELSE CLSiSCREEN9, 9, 9』 じ 
LOSE 提 1:RESUME43 ヶ 9 

4329 DN ERT GOTO 149』 ご ご 9, う 9, 3889 

人 4499 MINDOMCG。183 ぅ 一 て る 3 。 1 タウ ァ う ELS4 MIND ロ て 9」9) (る 3 ァ 。 1 の) : RETURN 

4419 LINE(9,29) -〈63 タ , 4 る 6) 。 PSET。 5 

4429 LINE て 1, ら 1)- て 638。 45〉 。 PSET。 4 BF 

4439 LOCATE 1。1:COLUR7IPRINT "KANT TI MHRD PROCESSOR " 

4449 PO=159:REST ロ RE "HERD" 

4459 FOR ゴゴ =1 TO 11:RERD KiPOSITIQ ロ N P ロ 25 iPATTERN- 1 る KANJT 1 和 ま て K) iP ロ =P ロ +2 1 5 NEXT 
4429 COLORSiL ロ CRTE35,1:PR INT" for ※X1『 

人 479 LUCATE る 3。 1 iPR INT"B ッ Itti Rittaporn"iRETURN 

4489 LABEL "HEAD":DATA 38 ウ 2 ご 4369」2 つ 4 プア の, 5 アウ 」128。 54 1 , 5 王 , 5 アア 王 ら 7 弓 35, 52 1 
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西暦 2984 年 。 初代 の 宇宙 戦 鑑 ギャ ラク テ 
ィ カ が 地球 に た どり つい て 100 年 あま り 経 過 
し まし た 。 こ の 間 , 人 類 の 科学 技術 は 飛躍 
的 に 発展 し , 遠く 太陽 系 を 越え た 宇宙 空間 
に 都市 ′ の 建設 が 進め られ て いま し た 。 

科学 技術 が 発達 し た と は いえ , その 力 は 
ま が だ 銀河 系 の 全体 に 及ぶ も の で は な く , 開 
発 に つぐ 開発 を 必要 ほし て いま す 。 

宇宙 都市 は 開発 の 拠点 で あり , 開発 探査 
船 の 前 進 基地 の 役割 を に な っ て いま す が , 
生活 環境 は 地球 と 変ら ず . タキ オン を 利用 
し た 超 光 速 通信 網 の 発達 に よっ て , 情報 連 
絡 は 辺境 の すみ ずみ まで 同時 的 に 伝え られ 
文化 的 な 隔 差 は 生じ ませ ん 。 

また 開発 探査 は ワー プ 航 法 に よっ て 未 
曽 有 の 発達 を とげ ま し た が , まだ 安定 し た 
も の と いえ ぇ ず , 高速 移動 型 デ ラッ ク ホ ー ル 
や 強力 な エネ ルギー を 不 規則 に 放つ ホワ イ 
ト ホ ー ル な どの 予期 せ ぬ 影響 を あう ける と , 
自分 の 位置 を 見 失っ て , 唱 難 する 恐れ が あ 
り ま す 。 

戦争 と いう こと ば が 使わ れ な 〈 な っ て 800 
年 あま り に な り ま す が , ギャ ラク ティ イカ を 
追い か け て きた サイ ロン 帝国 が 地球 に 対し 
て 敵意 を いだい て お り , 宇宙 都市 の 周辺 が 
不 隠 に な っ て きま し た 。 

地球 政府 は サイ ロン 帝国 と の 協調 友好 
関係 の 確立 に 努力 し て いま す が , 険悪 る さ は 
いっ そう つの っ て くる よう で す 。 

そこ て で 各国 政府 は 地球 連合 軍 を 急 避 組織 
し , 宇宙 都市 と 地球 を 防衛 する 必要 に 迫 ら 
4 まじ だ 。 

現役 の 宇宙 戦 艇 ギャ ラク ティ カ は すでに 
3 代目 で す が , 抜群 の ワー プ 能 力 と 、 ワー 
プ の た め の エ ネル ギー 補充 を 宇宙 空間 に 漂 
う 素 粒子 の 超 核 融合 に も と め て 短 時 間 で 行 
な える こと か ら 。, 宇宙 都市 防衛 の 任務 に つ 
いて いま す 。 


ーー 
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記 


攻撃 力も 倍加 し , ノー マル ビー ム の 他 に , 
素 粒子 の 超 核 融合 に よる ウエ イプ ブ ・ ビ ー ム 
(W. BEAM) も 発射 で きま す 。W.BEAM 
は 強力 で 惑星 さ ぇ 破壊 し て し まう の で す 。 

ギャ ラク ティ カ 皿 世 号 の も う ひ と つの 特 
長 は , 攻撃 に よっ て 被害 を 受け て も 自己 修 
復 機能 が すぐ れ て お り , 壊滅 的 な 損害 で な 
けれ ば 比較 的 短 時 間 で 復旧 きせ る こと が で 
きる こと で す 。 もっとも, 復旧 作業 は 戦闘 
中 に 不可 能 で すし , エネ ルギー が 満た され 
て いる と き に し か 修復 で きま せん 。 

と ころ で あな た の 搭乗 する ギャ ラク ティ 
カ 皿 世 号 は 次 の 7 つの スペ ー ス ・ ブ ロッ ク 
の 防衛 を 担当 し て いま す 。 

スペ ー ス ブフ ブロック 1 

これ は いう まで も な く 地 球 の ある 空間 で 
す 。 宇 宙 一 美しい 星 ほ と いう だ け で な く 地 球 
人 類 の 文化 の 光り 輝く 《 星 で す 。 こ の 地球 が 
攻撃 され 破壊 され る こと は 何と し て も 防 が 


な けれ ば な り ま せん (宇宙 都市 は あり ませ 
ん 。 念 の た め ) 。 


スペ ー ス ブロ ッ ク ど 

この ブロ ッ ク に ある 宇宙 都市 は その 背景 
に , 金銀 の 宝石 を も ちりばめ た よう な hxz と 
いう 二 重 の 散開 星団 を も っ て いま す 。 地 球 
か ら み る と カシ オペ ア 座 と ペル セツ ウス 座 と 
の 間 に あ り , 双眼鏡 な ど で み る こと が で き 
ます 。 ギ ャ ラク ティ カ の 防衛 する 宇宙 都市 
と し て は 一 番 古い も の で す 。 


スペ ー ス ブロ ッ ク 3 

地球 か ら み た 位置 は いて 座 の 方 向 で M20 
と いう 美しい 散 光 星雲 の 近く に な り ま す 。 
この 散 光 星雲 は 三 裂 星雲 と も 呼ば れ , 明る 
《 光 っ た と ころ を 暗黒 星 宏 が 3 つ に 分 離し 
て いる よう に みえ る た めそ の よう な ニッ ク 


。W  。 


Elder Man 


ネー ム を も っ て いま す 。 距離 は 5200 光 年 あ 
り ま す が , 銀河 系 の 中 心 に 近い と ころ に あ 
る スペ ー ス プ ブロッ ク で す 。 


スペ ー ス ブロ ッ ク 4 

この スペ ー ス プ ブロック は ,。 オリ オン 座 の 
方 向 に あり , M42 オ リオ ン 座 の 大 星雲 を 背 
景 に も っ て いま す 。 こ の スペ ー ス プ ブロック 
は 地球 か ら み て 銀河 系 の 中 心 と は 反対 の 方 
向 に な り ま す の で , 太陽 系 か ら る ら に 1500 
光 年 も 離れ た 銀河 系 の 端 に な り ま す 。 と は 
いう も の の 赤 紫 に 輝く 美しい 大 型 の 散 光 星 
雲 を みて いれ ば , 地球 か ら 遠 く 離 れ た 宇宙 
都市 の 人 々 の 心 も な で る め ら れる こと で し 
よう 。 

スペ ー ス ブロ ッ ク 5 

地球 か ら は , 冬 の 空 に ある いっ か くじ ゅ 
う 座 ほし いう と ころ に み ら れ る も の で , 4600 
光 年 離れ た 暗い 散 光 星雲 ぴあ る た め な か な 
か 地球 上 か ら は 望遠 鏡 を 使っ て も み ら れ ま 
せん 。- バ ラ の 花 の 形 を 思わ せる 赤い 星雲 で 
な か な か 美しく ,。 バラ の 花 の 中 心 で は 新 し 
い 星 が 誕生 し て いま す 。 


スペ ー ス ブロ ッ ク 選 

背景 に 大 きく みえ る の は M31 ア ンド ロメ 
ダ 座 の 大 星雲 で , 銀河 系 と うり ふた つの 次 
を し て いま す 。 距離 は 200 万 光 年 も あり ま 
す が を その 巨大 な 大 きる の た め 近 (に 感じ ら 


れ ま す 。 地 球 の 人 間 が , 銀河 系 を 離れ て 他 
の 小宇宙 に 行け る の は どの くら い 先 の こと 
で し ょ うか 。 こ の スペ ー ス プ ブロッ ク は 地球 
か ら 遠 く 。 サ イロ ン 帝 国 の 侵入 や 受け や す 
い 位置 に あり ます 。 


// パ ーー スプ ロッ ツア 

地球 か ら は りょう けん 座 の と ころ に みえ を ぇ 
る 小宇宙 で M51 と いい ます が , 子連れ の 小 
宇宙 と し て 有名 で す 。 銀 河 系 $ も 大小 マ ゼ ラ 
ン 星 雲 を 伴っ て いる の で , 遠く か ら み る と 
この よう に みえ る の で し ょ うか 。 地球 か ら 
一 番 離れ ん た と ころ に ある この 宇宙 都市 は , 
建設 か ら 日 も 浅く , 周囲 の 環境 に まだ な じ 
ん で いま せん し , サイ ロン 帝国 の 攻撃 を 受 
け や す いと ころ に あり ます 。 

ギャ ラク ティ カ 発 進 

スペ ー ス プ ブロッ ク の 案内 を みた らい よい 
よ ギ ャ ラク ティ カ の 発進 で す 。 地 球 の 姿 を 
みな が ら ワ ー プ の た め の エ ネル ギー の 充満 
を 行い ます 。 エ ネル ギー の 充満 度 は スク リ 
ー ン の 左下 の イン ジ ケ ー タ ー に 示 る れ ま す 。 
濃い マゼンタ の レベ ル が 徐々 に 増加 し て い 
きま す 。 ス ペー スプ ブロ ッ ク の 情報 が スク リ 
ー ン の 上 方 に 示さ る され て いま す 。 ス ペー スプ 
ロッ ク 7 の 宇宙 都市 が 戦闘 体制 に 入っ た こ 
と を 知ら せ て いま す 。 る あ ワ ー プ で す 。 キ 
ラ め 星々 の 中 を タイ ム ト ン ネル を 進む よ 
うに ワー プ が 始ま り ま し た 。 
ワー プ ' が 終わ り ス ペー ス ブ ロ ッ ク 7 の 光 
景 が 目前 に 見 を えて いま す 。 宇宙 都市 が 少し 
破 諫 きれ て いま す 。 あ っ / 現われ た の は 
サイ ロン 帝国 の 戦闘 機 で びす 。 グ リー ン に 輝 
機体 が 右前 方 か ら 現われ , 宇宙 都市 を 攻 
撃 し て いま す 。 ギ ャ ラク ティ カ \% 戦 闘 体制 
に 入り , ビー ム の ター ゲッ ト を 戦闘 機 に 向 
け ま す 。 ビ ー ム 発射 ノ サイ ロン 


命中 ノ 


SPACE_BLOCK」1 = 粒 1 2= に 13= に 14=-15=-16=-1 ア = 


帝国 の 戦闘 機 も こち ら の 存在 に 気がつい た 
よう で す 。 こ ちら に 向っ て 攻撃 を 開始 し て 
きま し た 。 ギ ャ ラク ティ カ の 正面 か ら 接 近 
し , 機体 を ひる 返す 攻撃 パタ ー ン で す 。 戦 
闘 機 を 破壊 し 終わ る と サイ ロン 帝国 の S, 
SHIP が 現われ まし た 。 ノ ー マ ル ビー ム 1 
発 で は 撃墜 で きま せん 。 ノー マル ビー ム で 
は 3 発 命中 させ な けれ ば 撃 上 で びき な い ほ ど 
S.SHIP は 強力 で す 。S. SHIP の 攻撃 で す 
/ ビー ム を 一 瞬 に た くさ ん 発射 し て きま 
す 。 戦 闘 機 に よる ダメ ー ジ と は ずい ぶん ち 
が う 。 強 烈 な ダメ ー ジ で す 。 

ギャ ラク ティ カ は W.BEAM 発 射 で 対処 
する こと に し まし た 。 エ ネル ギー 充満 スイ 
ッ チ ON/。 あっ , スペ ー ス ブロ ッ ク 6 i 戦 
戦闘 体制 に 入っ た と 表示 され て いま す 。 急 
いで そちら へ も 向かわ な けれ ば な り ま せん 。 
エネ ルギー 充満 完了 / ター ゲッ ト を 慎重 
に 定め て , W. BEAM 発射 / S.SHIP を 
較 し 、。 ス ペー スプ ブロック 7 で の 戦い は 終 
わり まし た 。 幸 い 敵 の 攻撃 に よる ダメ ー ジ 
は 小さ い の で , 修復 作業 は 後に 回 し て , 再 
び エ ネル ギー を 充満 し て スペ ー ス プ ブロッ ク 
6 へ 向かい ます 。 ス ペー スプ ブロ ッ ク 6 で も 
サイ ロン の 戦闘 機 が 宇宙 都市 を 攻撃 し て い 
ます 。 宇宙 都 市 の 損害 も 大 きい よう で す 。 
あっ / スペ ー ス ブロ ッ ク 4 も 5 もち 戦闘 体 
制 に 入っ て し まっ た 。 こ こ で の 戦闘 を 早く 
切り 上 げ な いと 他 の スペ ー ス プ ブロッ ク の 宇 
宙 都 市 が 破壊 され る ノ ・・・・・・・・・ 
ギャ ラク ティ カ は ダメ ー ジ を 受け た も の の , 
プ ブロック 6 で の 戦い に 勝ち ょ し た 。 エ ネル 
ギー を 充満 し 。 ダメ ー ジ を 修復 し . ブロ ッ 
ク 5 ヘ ワ ー プ "し ます 。 

ガーー ジ ie ws. 2 ワー プ 失 敗 で す 。 真 
赤 な 星 ど ら け の わけ の わか ら な い 宇 宙 空 間 
に ワー ジ し て し まい まし た 。 ギャ ラク ティ 
カ の 位置 を 示す 表示 も どの ブロ ッ ク も 示し 


SPRCE _BLOCKI1= 12= 13=!!4= 15= 16= 」 マ = 


ENERGY 


た と 表示 る れ て いま す 。 も う 一 度 ワ ー プ の 
や り 直 し で す 。 再び ワー プ / 今度 は 成功 。 
バラ 星雲 を 背景 に し た 光景 の 中 で 宇宙 都市 
が 大 き な 被 害 を 受け て いま す 。 あ と 2 一 3 
回 攻撃 を 受け る と 大 爆発 を 起こ し て し まい , 

も う 修 復 不可 能 に な っ て し まい ます 。 プ ブロ 
ッ ク 5 で は , 戦闘 機 や S.SHIP だ け で な く 
いよ いよ M.SHIP も 現われ まし た 。 マ ゼン タ 


色 に 光輝 く 機 体 は 不気味 その も の で す 。 プ 


ロッ ク 4 の 情報 は 大 き な ダ メー ジ の 表示 に 
変わ り ま し た 。M.SHIP を 撃墜 し た と ころ 
で , サイ ロン 帝国 は ひき あげ た だ たよ う で す 。 
他 の スペ ー ス ブロ ッ ク も 元 の 安全 の 表示 に 
戻っ て いま す 。 

し か し , サイ ロン 帝国 の 攻撃 は これ で 終 
っ た わけ で は あり ませ ん 。 次 の 攻撃 に は 一 
層 戦 力 を 増し て や っ て きそう で す 。 

それ か ら の この 話 は ・・・・ そ うこ の 後 
の スト ー リ ー は あな た 自身 で 体験 し て みて 
くだ きい 。 す べ て の 宇宙 都市 が 破壊 され , 地 
球 も サイ ロン 帝国 の 攻撃 の 前 に 崩壊 し て し 
まう の か , サイ ロン 帝国 の 再三 再 四 の 攻撃 
を 完全 に 封じ る こと が で きる か , それ は ギ 
ャ ラク ティ カ に 乗る あな た の 腕 し だ いで す 。 


ENERGY 


A 
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ィ SPACE PATROL Copyright 1283 by E1derNMan, TomTomSo 了 ft 
SCREEN9, 9, 9:PRLIE MINDOM:CL ICKOFF iPALETIDEF INT-Y 
CLEAR&HFF99:DINM C ま (17) ょ じ (19> 
GOSUB?599 
IDTH49:GUSUB ゥ 999:TTS=9:GD=9 

MIDTH49: TENPO399: に =1: 品 =1 :GOUSUBB999 
Y=19:X=15:X1=15:Y1=19: 凡 =9:D=29: フ プン = の 9:TTS=9:KQT=9:FLG=9 

IF STRIG(9)〉) GOSUB 7499 

GOSUB 5999:GUSUB 2999:KiI=3』LX=5:LY=Si IF FLG=3 THEN 4359 

IF Z〈K〉 > GOSUB4599 

IF 選 〈K〉 く < の OR (Z〈K〉>>18 QND K<>1) THEN 129 

IF K=1 THEN 2 る 9 

IF _ RND く .5 GOTO 1299 

CANVMAS2。 4 5 』 ソ =4 : ロ X=RND※69+189: ロ Y=RND ホ の 29+ ア 9:PX=QXEPY=QY:FLG=9:ED=2: ID=9 
FOR PY=QY TO129 STEP2iSCREEN ,,2:POSITION PX,PYiPATTERN -8。D ま く 〈③> 
GX=PX+3 』: GY=PY+3 : GUSUB2999: IF FLG=1THENPY= 1 ら 9 

PX=PX- 1 i NEXT PYIiQX=PX: IF FLG=1 THEN 256 

FOR PX=QX TO 1 る 9 STEP -3:SCREEN ,,2:POSITI ロ N PX,PY 

PATTERN -8,D ま (4) :GX=PX+2』 GY=PY+31 GUSUB2999: TIFFLG=1THENPX= 1 る 9 

NEXT PX:CANUAS2, 4,5: IF FLG=1 THEN 259 

SCREEN, 』1 iL INE (PX, PY+2) - (9, PY+2) , PSETiL INE (PX。 PY+ る 6) - て 9, PY+6) , PSET 
NMUSIC " り 1404B9":LTINE (PX, PY+2) - 〈9。 PY+2) 。 PRESET* LINE ( ら X。 ビ Y+ る 6) て 9』 P ビ Y+6〉 。 PRESET 
COLOR ア ECGEN1:FOURI=114TU118:LOCATE 12 つ 。 15:PRINTCHR 和 まく 1) sgNIUS EC" り 14 ロ 3C1R "INEXT 1k ビ 


〈(K) = ププ 〈 バ K)+1 3 IF プ (K〉) >18 GOSUB 3999 

FOR PY=122 TO タ STEP-3:SCREEN, , 2:PDSITIONPX。PYsPRTTERN-8 ぅ D も (る > 
GX メ =PX+3 』i GY=PY+2 : GUSUB2999: IF FLG=1THENPY= タ 

NEXT PYiCLS2 

K1I=KI-1:IF KI>9 THEN 159 

ON FLG GOTO 2 る 5 4399, 4359 

GOSUB 5S999 

IF TTS> て (て 15+K 人 IS5〉) THEN 4999 

FLG=9: IF NM く <1AND S く 1 QND F く 1 GOSUB 3199sGOTO 129 

IF S く <1ND F く 1 GOTO 1999 

IF F く 1 GOTO る 99 

ED =2 』 り =4 : CANUAS3, り , 5: ID=19:PX=129+RND※1 つ 8:PY=49+RND※49 
REPEAT ISCREEN ,,2:POSITION PX,PYiPATTERN -8,D ま も (3) 

PX=PX- 1 iPY=PY+2 : G メ =PX+3 5GY=PY+3: ID=ID-1:G1=2 3162=6:G3=4 

IF _RND く . 1 THEN _RX=RND※299:SX=RX+199:GOUSUB 3369 

GOSUB2999 

UNTIL 1D=9 OR FLG>9:ON FLG GOTO 2 る 9,4399 

ID =2 1 iRKEPEAT IiSCREEN , ぅ 2:POSITION PX,PYkPRTTERN 1 る, ビ 多 (て 13) 
PX=PX+ 1 iPY=PY+2 』i GX=PX+ ア 5GY=PY+5: TID=】Dー1:G1= づ 5G2=1 1 : は 3=8 
IF _RND く < く .2 THEN_RX=RNDX299:SX=RX+199:GOUSUB 3399 

GOSUB2999 

UNTIL ID=11 OR FLG>9:ON FLG GOTO 269,4369 

ZNM=RND : IF ZM>. 6 る THENI TI=9:P 和 も = まく (19) iGOUTU429 

IF ZM>.3THENTI エ =ー3 iP まあ = て 1 1) :iGUT0429 

1 1 =3:P 生 = じ ま も て (12) 

REPEAT:SCREEN ぅ ,2:POSITION PX,PYiPATTERN -18 る ,P 廊 
GX=PX+7:GY=PY+ プ 』 ミ PX=PX+ 1 TiPY=PY-3:GOSUB 2999 

UNTIL PY く <19 OR FLG>9:CLS2 

ON FLG GOTO 2 る 9 4399 

GOT0269 

し LX=8:iED=9! り =11CANUAS 3 いり,5: ID=8:PX=129+129 ポ RND :PY=49+RND49 
REPEAT SCREEN ,,2:POSITION PX,PYiPATTERN -8,D ま まく 1> 

PX=PX+ 1 :PY=PY+2 : G メ =PX+3 : GY=PY+③:』 ID=IDー1: は 1 =P ベ + ジ 5 は =PX+6 は は =PY+ 
IF _RND く . 92 GOSUB 3 る 699 

GOSUB 2999 

UNTIL ID=@ OR FLG>9:ON FLG GOTO 229, 4399 

ID=22 iREPEATiSCREEN 」 ぅ 2:POSITION PX,PYiPATTERN -1 る , じ も (8> 
PX=PX- 1 iPY=PY+2: GX=PX+ ア GY=PY+5: ID=ID-1 :G1=PX+5 ミ G2=PX+ 19』G3=PY+ る 6 
IF _RND く .94 GOSUB 3 る 99 

GOSUB 2999:UNTIL ID=19 OR FLG>9@ 

ODN FLG GOTO 26 る 9, 4399 


< / ) 


いい 
れい SS 
る で ー 
に ソ て 記 | 
し っ の ^ 


る 9 

る S”4 

る?5 

る る? る 

796 

719 

729 

739 

1999 
1919 
1929 
1939 
1935 
1949 
1959 
1969 
1979 
1989 
1985 
19 タ 9 
1199 
1195 
1119 
1129 
1139 
1299 
1219 
1229 
1239 
1249 
1259 


REPEAT SCREEN 2:POS1TIONIE PX 。PYsPRTTERN -1 る 6, まま て 14)+ ビ まで て 1 ちら う 

IF _RND く 。、1 THEN EE=-EE 

IF _RND く 。 1 THEN EF=-EF 

IF PX>399 DR PX く <@ DR PY<B HK PY>179 THEN EE=-EE :EF =-EF 
PX=PX+EE iPY=PY+EF :GX=PX+ 15:1GY=PY+Bi ID=ID-11 ロ 1= ビ X+ ア 1 ロロ G=PX+ ら 2* ロ は = ニ PY+8 
IF_RND く <. 96 GOSUB 3669 
GOSUB 2999:UNTIL FLG>9iUN FLG GUTOU 269, 4399 
GOT0 2 る 9 

LX=8:ED=-2: り =3:CANUAS 3, り ,5:TD=19:PX=1 ら 9+129RND :PY=49+RNO※ ポ 49 
REPEAT:SCREEN 』,2:POSITION PX,PYiPRTTERN -8』D 生 ( ら ) 

PX メ =P メ + 1 :P ヤ =PY+2 : は メ = ニ P ペ +3 5 GY=PY+3』 ITD=1D-1:G1 = の 1 は どの =6:G さ = 
IF_RND く . 1 THEN RX=RND ポ 299:SX=RX+ 199:GUSUB 3399 

GOSUB 2999 

UNTIL ID=9 OR FLG>9iOUN FLG GOUTO 2829,4399 

ID=21:REPEAT:SCREEN 」,2iPOSITION PX』」PYIPATTERN -16, ビ ま ( の ) 

PX=PX- 1 iPY=PY+2 5GX=PX+ ア BY=PY+5i ID=ID-11 は 1=5iG の =19:G さ =6 

IF _RND く .2 THEN RX=RNDX ら 99:SX=RX+199:GOUSUB 3399 

GOSUB 2999iUNTIL ID=11 QR FLG>9 

ON FLG GOTO 2 る 9,4399 

E=1:REPEAT IiSCREEN ,,2iPOSITION PX。PYiPATTERN 1 る ,C ま (1 る) + ビ まく て 1 ア ) 
PX=PX+E iPY=PY- 1 +RND2 1 ロメ =PX+ 15 1GY=PY+8B: TID=ID-1: ロ 1 = アロ の = どら 2 は 3= ら 
IF PX く <49 OR PX>289 THEN E=ーE 

IF _RND く .3 THEN_RX=RND※299:SX=RX+199IiGUSUB 3398 

GOSUB 2999:UNTIL FLG>9: ロ N FLG GOTO 2 る 9』4399 

GOTO 26 る 9 

CANVMAS2 4,5: り =4:iFLG=9:PX=89 

FOR PY=8 TO 89 STEP3iSCREEN 』。2iPOSITION PX,PYiPATTERN -8』D も (5) 
GX=PX+3 』GY=PY+5:GOSUB 2999:{F FLG=1THENPY=89 

NEXT: CANUAS2,4,5i IF FLG=1 THEN 259 

SCREEN,。 。1 iL INE (PX+1。 PY+) ーー (PX+1。 1 の 9) PSET IL INE (PX+ る 。 PY+8) - (PX+ る 。19) , PSET 
ト MUSIC" り 1404B9" iLINE (PX+ 1 PY+8〉) (PX+1。1 タ 9) ,PRESETiL INE て PX+ る 6, PY+8) - て PX+ る 6。1 タ 9) 


ぅ PRESET 


12 る 9 
EN9 

1279 
1289 
12 ヶ 9 
1399 
2999 
2919 
2929 
2939 
る 949 
2959 
6655 
2969 
ら 2989 
2984 
ら 985 
298 る 
ら 29 ヶ 9 
ら 9?5 
2199 
2299 
2399 
2499 
2599 
2 る 99 
2799 
2899 
2 ヶ 99 
2 ヶ 19 
2?15 
2 の 18 
2 の 29 
2?39 
3999 
3995 
3919 
3912 
3914 
3916 
3929 
3939 
3949 
3199 
3119 


COLOR7 iCGEN1:FORI=114TO118:iLOCATE19,14:iPRINTCHR 和 (1) iMUS ITC" り 14 ロ 3C1R "INEXTICG 


Z(K〉 = ズバ K)+1 3 1TF プ (K〉> >18 GOUSUB 3999 

FOR PY=89 TO 182 STEP3:iSCREEN 』,2iPOSITION PX,PYiPATTERN -8』D ま (5> 
GX=PX+3 1: GY=PY+5iGUSUB 2999: IF FLG=1THENPY=182 

NEXTiCLS2iGOUTO 259 

ST=STICK て 9) :ON ST GOTQ 2 199,2299, 2 の 399, ら 4 ロ 9, つ 9, の らら, 2 ア 99, つ 99,2299 
DX=9:DY=9iGOUTO 2989 

メ =X メ +DXI Y=Y+DY 

IF X く 9 THENX=9 

IF X>32 THENX=3 ヶ 

IF Y く 1 THENY= 1 

IF Y>23THENY=23 

PUT9(X1』Y1)-(X15Y1)」 CEGET9 (XY) -(X。 Y) 5 ビ 

COLQR3 iLOCATEX, YEPRINT"+ リ ョ 

フフ = プ Z ォ ブル | に = フ フミ 1 エ FM> 1 9THENM= 19: プ 内 =9: SOUND 1 9, 9 

IF =19 THEN LOCATE7,24:PRINTSTR ING 多 (て 19, " 略 ") ji:GUT ロ 29 タ 9 

IF ププ <>9 THEN LOCATE7 ア 24:PRINTSTR TNG て くい 。" 菩 ")STR ING 和 (19- 愉 ," 工 ") ji KGHSUBZ2 9?5 
X1=XsY1=YIRETURN 『 

SOUND4 255- い 29 i SDUND5。1 1 :SDUND ア ょ 5 の :SDUND 1 9」1:RKETURN 

いい =. 5 SOUND4 , 255- し bk ら 9』 SUUND5。1 1:SOUND7,5 ヶ 』 SnUND 1 9, 15:RETURN 
DY=1:GOT02929 

Z ル =9: SUUND 1 9, 9: RETURNI 

DX=- 1 iGUT02929 

GOSUB3299:RETURN 

DX= 1 :GDTO2929 

SOSUB4 1 99:RETURN 

DY=-1:GOT02929 

IF 〈(Z<K〉> > 人 ND KK> く <18) OR Z ト <>9 THEN RETURNI 

D=D+1: IF D>29 THEN D=29 

LOCATE 29,24:PRINT SPC(18)』 

COLOR 4:LOCATE 29,24:PRINT "RECOUERING !" ョ 

COLOR2, 9: MUSIC" り 1305-C2+C "ELUCATE29,24 iPRINT "DAMAGE ! "Ds 

RETURN 

CANMAS2, り , 5 : SCREEN ,。1 

FOR !=1 TO 7 

PO0SITION 8 る 。 114:PATTERN -16。C 季 (1〉2 MUSIC" り 1403C8" 

POSITION 7 る 6。 129:PQATTERN -16。C 生 〈1) 

PUSITION 28,128:PQATTERN -16, ビ 季 て (1) 

POSITION 88,139:PATTERN -16 る に ビ 生 て (1) 

NEXT:iCLS 1 :CANUAS3, いり, 5 

LOCATE19, 14:iPRINT" "siLOCATE19。15iPRINT" 

LOCATE 1 9, 1 る iPRINTP "gsKI=9s プ <K〉>=1sRKETURN 

MUSIC " り 1404C2EGECEGECEG+C8" 
IF ズ (K〉> >18 AND K<>1 THEN RETURN 


7. ノ 


Z(K) =3』RETURN 
IF ZM く <>9 THEN MUSIC "いり 1303 人 9" iRKETURN 
CANUAS3, り , 5: SCREEN 1:C ベ = ニ X ポ B+3: ビ Y=YB+35 MUSIC “りり 1303C9:04C9" 
LINE (9。187) - (CX。 CY〉 。 PSET 

LINE 〈31 の 2。187) - (CX CY> 。 PSET 

LINE (9。 18 ア )- (CX+ 1 CY) , PRESET 

LINE (31 の ,187) (CX+ 1 CY〉 。 PRESET 

LINE 9, 187) (CX, CY〉 ) PRESET 

LINE (312, 187) - (CX』 CY〉 』 PRESET 

IF QBS (CX-GX) く LX 人 ND BS(CY-GY〉) く <LY GOSUB 3599 

RETURN 

SCREEN 1 :CQNUAS2。 いり 5 

L INE て PX+G 1 。 PY+G3) - (RX。1 の 9) 。 PSET 

L INE (PX+G2 ょ PY+G3) -〈⑤SX。1 の 9〉) , PSET ト NMUS 1C" り 14 ロ 4B9" 

IF _RND く .3 THEN D=D-1:GOUSUB 3499 

L INE (PX+G 1 。 PY+G3) - て RX。1 の 9) , PRESET 

LINE て PX+G2』 PY+G3) - 〈SX。 19) , PRESET 

RETURN 

FOR 1I=9 TO 3iCOLOR ,2:NMUSIC" り 1503C9" 

COLOR2, 9:MUSIC" り 1504C9" :NEXT 

IF D= く 9 THEN FLG=2 

FOR !=9 TO 2 

LOCATE29,24:PRINT SPCKX18〉 ig ト US 1C" り 1305E2" 

COLOR2。 9 : ト US1C" り 1305C2" LUOCATE29,24:PRINT "DAMQGE ! "3Di ENEXT 
RETURN 

IF いく <>4 QND ED く <2 THEN 3799 

IF いり =4 THEN 3899 

SCREEN,』,2iFOR 1=1 TO 7 

IF 1<3 THEN CANMAS3。 る ,5 ELSE CANVAS3, 2 5 

POSITION PX,PYiPATTERN -1 る ぅ じ ま く (1) MUST1C" り 15 ロ 2C9" 
POSITION PX+14,PYiPATTERN 1 る 。 ビ まく 1) 
NEXT:CLS2:FLG=1:CANVAS3。 り 」 5 TS=TTS+1 

CLS2 : PX=PX+ CRND く . 〉 B+4 : PY=PY+ (RND く . 5) B+4 

RX=PX: RY=PY 

ON いり GOTO 3559, 3569, 3569, 3579 

S=S- 1 :RETURN 

NM=N- 1 iRETURN 

F=F-1 :RETURNI 

CANUAS 2 いり,5:SCREEN 1 

LINE 〈(G 1,。 G3) -〈19。187) ,PSETiLINE (G1。63) (149,187)。PSET 
L INE 〈G 1 。 G3 ぅ -〈9, 129〉) , PSETsL INE (G ら 。G3〉 〈③1 の 。149) , PSET 
LINE 〈G 1 G3〉 (9,29) , PSETiL INE (G2,G3) -〈399。187) 。 PSET 
LINE 〈G 1, 6G3) -〈89, 12) , PSETiL INE (は G2) 3) - て 189。12),PSET 

し LINE (G 1。G3) - (299, 187) , PSETiL INE (G2,G3) て (289。12) 。 PSET 
L INE 62 G3) -〈③1?,49) , PSET:i LINE 〈G2』 63) 一 (31 の 。199),PSE~ 
MUSIC " り 1505+B9- ヒ ーE ビ + ロ -ーEFQ+E ビ ー ロ +D - 合 じ + は 日 ビ ら 『" 

IF _RND く <.2 THEN CLS1:RETURN 

D=D-4:GOUSUB 3499:CLS1:RETURNI 

SCREEN。,2iFOR 1=1 TO 7 

IF 1 く <3 THEN CANUAS3」 6,5 ELSE CANUAS3。 2。 5 

POSITIOUN CX-8,CY-8:PATTERN -16, じ も (1) 5 ト MLUIS ITC" り 1502C@" 
NEXT: ED=ED+1:CANURS3」 り 。 5 

CLS2 : PX=PX+ 〈RND く . 5) B+4 :PY=PY+ (RND く 5) 8+4 

RX=PX: RY=PY:RETURN 

IF ID く <19 THEN FF=4 ELSE FF=9g 

SCREEN,,2:FOR 1!=1 TO 7 

IF 1<3 THEN CANMAS3, る ,5 ELSE CANVAS3, 

POS ITION PX-FF,PY-FF PATTERN -16。 じ も て (IT) 3MUSTC" り 1502C9" 
NEXT:CLS2:FLG=1:CANUMAS3。 り 。 5 : TS=TTS+ 1 

ODN ソ GOTO 3559, 3549, 356 る 9 3579 

COLOR5 : LOCATES, 15kPRINT "YOU MIN |! ROUND NoO。 "5K 全 エ + ォ 1 
MUSIC" り 1404 - じ 2-Eー は -Eー は ヒーGCECEGEG+CSR4 " 』K 谷 エニ K 全 エキュ 


IFKAI =5GODSUB 59999: し OCTES8,」18:PRINT "GAME VER TRY AGRIN CYZ ト D ラリ BEEP KT=9* 


4949 


COLOR3:LOCATE 12, 18kPRINT "TRY NEXT (YZN> 2 " : BEEP 

S ま も = INKEY 和 ま : IF S ま ="Y" OUR S 和 ま = リ "リッ" THEN BEEP: IF KK 全 1= ロ THEN 9 ELSE 449@g 
IF S ま ="N" OR S ま ="n" THEN 4979 

BOTO 4949 

COLOR7 :LUCATE 12,29EPRINT"... Bye bye ! 1 は! 


BEEP : PQUSE 1 9 : BEEP : END 

IFM く 19THENRE TURN 

=9 : プ =9: プ マフ =9:RESTURE39999 
GQ メ =X ヨ +3:QRY=Y ポ B+3 : CANUAS3 ぅ り 。 5 :SCREENI ょ 1 

FOR 『=187 TO GQY STEP -4 

S メ = (て 18 アー1) ロロ X ノ て (18 アー ロ Y) : イ ぶ = (エー ロ Y) 涼 (ヨコ 1 アー ロ ※ う プン て 18 コ アー ロ Y) + ロ X 
READC も MUSIC" り 1403"+ ビ まま 

LINE (SX, 1 ) (TX。 1 ) , PSETi NEXT 


4179 IFABS (GX-QX) く 2 人 ND ABS <〈GY-QY〉 く 7 THEN 4299 
4186 CLS1:GOTO 4239 
4299 CANVUAS3, 2, 5 
4219 COLOR1,2:MUS1C" り 1403C9":CLS1:COLOR7, g 
4229 GOSUB3595:FLG= 1:GY=9:COLOR3 
人 4239 LOCATE ア 。24:PR INTSTR ING ま て (19, " 北 ") 5 
4249 RETURN 
4389 FOR1I=1TO ア (1)=1 の ENEXT:GOUSUB 5989:GD=1 
4319 COLOR5:LOCATEB, 15:PRINT "GALACTICA was Destroyed !" 
4326 KAI=5iMUS 1C"U1404+C1BABAGAGFGFEFEDEDCBR4" : GUTD4625 
4359 COLOR3:LOCATES, 15:PRINT"The Earth was Crushed !!" 
4329 IF K=1 THEN CGEN1 :COLOR る :GOSUB る 916: :PAUSE5:COLORS:GOSUB る 919:PSISE5 iCOLOR9iG 
DSUB る 919:CGEN9 
437 ア 9 COLOR 了 GOUTU4329 
4499 FOR 1 =2TO7: ITF ンプ ( エ 5 うく 1 の THEN プ (エエ)=1 
人 4419 NEXT: プ (1〉)=1:GOUSUB 599gsiTTS=9 
4426 CONSDLE 1,23:CLSiCONSOLE 
4439 GOSUB458@:GOTn129 
4569 COLOR7:CGEN1:ON K GUSUB る 9@9,6299,6499,6699,6899, 了 999, 了 29g 
4519 CGEN9:RETURN 
56@99 FORI=1T07 
| 5992 IFI=K AND CM+S〉 く 1 THEN COLOR る :LOCATE IX4+19。9:PRINT" 較 " : GOTO5935 
| 5895 IF 1=K THENCOLORS る : LOCATE 1 水 4+ 19。9:PRINT" 較 ": GOTO5 935 
5S919 IFZ〈15 >18THENCOLOUR2 iLOCATE T ポ 4+ 19, giPRINT"E" : GOT0 ロ 5 g355 
5@15 IF<1〉> >15 THENCOLOUR3 』LOCATE T 水 4+19,g ロ iPRINT"D "GOT05 935 
5929 IFZ〈1) > め 人 AND 1I<>1 THENCOLOR 1 :LOCATE I※4+18」9IPRINT"F":GOTD5935 
5@39 COLOR4:LOCATE IX4+19, 9kPRINT"S" 
5935 (1) =Z(1)+RND※. 25 
5949 NEXT: 1FZ(1) >24THENFLG = 
5959 RETURN 
549@ IFZ〈K) > 18THENRETURN 
5495 F ま =" い ab" 1G も =" Cd" 日 あ = リ f ロ h" iM=11S= の : ド = 
54 1 0N 選 <K〉> -8 GOSUB 5599,555 り ,5 ら る 99,5 ら 5 ロ 。 5 アロ 9d,5759, ら 5899, ら 85 り , 5 ウロ, 5 99,5 ヶ 99 
542g COLOR ア 7 : CGEN 1 : LOUCATE 19,14:PRINTF 和 も : し DCATE 1 9」 15* 表 RINTG ま 
543@ LOCATE 1 9」 1 る:PR INTH 和 も: CBEN9: RETURN 
5569 IFRND く <. 5THENF ま =" い akK "ELSEF 和 ま =" iab" 
5519 G$="cde"iH ま ="fGh" iM=9iG=1iF=5iRETURN 
5559 IFRND く .5THENF ま =" 1aK" ELSEF ま ="1jb" 
55 る 9 G ま = "cgde"#H 生 =" ゴロ "EN=1:S ど = と *kF=5iRETURN 
5 る 899 IFRND く . STHENF ま =" ュ ョ K" : ロ 和 ま = リコ e" ELSEF ま =" ュ ココ 5 リロ 生ま = リロ" 
| 5 る 1 ロ H 和 = "イィ イロ h" :M=1: ら = コ 3:F= ら 6:RETURN 
| 5 る 59 NM=1: ら = づ 3:F= ア 
5 る 655 IFRND く .5THENF ま =" ュ a ョ に "ミロ 和 ま = リ "1 コロ " ミ H 生 = リ キロ FI" ERETURN 
5 る 69 F ま =" ュ aK "ミロ 生 =" 1 コ e "昌和 ま =" ロロ q" RETURNI 
| 5799 M=1:S=3:F=5RND+3 
| 5?95 IFRND く . 5THENF=" i コ K"EG ま =" 1dn" ikH 和 も = リ "fh" :RETURNI 
| 5 ア 19 F ま も =" リュ ョ K "は GO ま =" リ Cd" :H 和 ま = リ キロ ロコ "ERETLURN 
5759 M=1:S=3:F=5RND+4 
| 5755 IFRND く 。5THENF も =" ュ ュ K "は ま =" 1 ゴロ リミニ リキ ロコ "ERETURNI 
| 5 ア る 9 F 生 =" ュ ミュ K に "EGG ま = リ "Cd" ドロ = リキ ロ ロコ "ERETURN 
| 呈 899 M=2 : ら =4:F=5 ポ 民 ND+ コ 
| 5895 IFRND く . STHENF 和 も =" ュ jkK "7" G ま =" 1dn "昌和 ま =" こ ロコ "RETURNI 
5B19 F ま ="1jK" 1 も ="Cdn":H 和 も ="GP ロ "RETURN 
| 5856 M=3:S=4:F=5※RND+4 
| 5855 IFRND く . 5THENF ま =" 1jK "1G 和 =" 1dn" iH 多 ="OP コ "ERETURN 
| 58 る 9 F ま =" ュ ュ K "まま =" 1 dn "ミロ 事 ="oOE ロ "RETURN 
5 の ロロ =4: ご =5:F =5 水 民 NIE' キス 
5 の 16 F 生 =“1jK"EG ま = リ "1mn isH 和 ま =" OpP ロ "iRETURN 
6999 M=55:F ビ = : ら =19+ ロ 水 K 人 エー 和 TS = IF S く < く @ THEN S=@ 
69219 LUCATE18,」19i:PRiNT "MXKY" iLUCRTE 18」11:PRINT "7 iLOUCaTE 18。12IiFPRTINT "1 へ く _" 
| る 926 RETURN 
| 6299 LUCATES,5:PR INT "NOP "LOCATE。 る EPR ENT "GRG" し 0 ロ C 台 TE アミ PR TINT "て ロリ 
| 6219 GOUSUB 5S499gkRETUERN 
| 6499 LOUCATE39。19:PR INT "45" sL ロ CATE3 ロ 。、1 1 :PRKTINT "6 る 78" LOCTE ヨ 9。 12 iPR ENT "の ミュ ミリ 
る 2419 GUSUB 5499:RETURN 
G6 ら 99 LUCATE22。 4 :PR INT" 玉 +。 "し ロロ TE ご ビ と どく PR TNT リー プリ ミヒロ ヒロ TE22, る SIPRTINT "1 の 2 
| る 618 GOSUB 5499:RETURhi 
| 88@ LUCATE2 ア , ア PR INTCHR ま (33〉CHR 和 まで 347 CHE 和 まで 35) = し CATE2 ア 。 EPR TNT "まあ 28." ELUCATE2 ア 」 の ミ ビ 
| 恨 没 NT みみ " 
| 6819 GOSUB 549@:RETURN 
| ア 969 LOCATE25。16:PR INT"EFG" ELOCATE25」17:PR INT "HIT" ELOCATE25,」 1E iFPRTNT"KLM" 
| 了 919 GOSUE 5499:RETURN 
| 7 と 99 LOCATE18,5:PRINT "<= ニ >"sLUCATE18。 る iPRINT"2aA" iLOUEATE18。 了 EPR ENT TBCD" 
| プア ご 19 GODSUB 5489:RETURNI 
| 49g コ :F MkM<1g THEN RETURNI 
| ィ 495 BEEP : CULHR5 : LUCRTE ご 9。 ご 45PRTINT "BLDCK ト NO。 = aiK1= ニ 17EY1= ニ 1 ジョニ 1 は YY=Y1 


749 ら る 


に 


(9)=9: ビ (1)=9: じ (ご ど ) う = ワ 9 


名 | 
、@ 

4 ( 

いい (@ 


7419 K=STICK て (9) : IFK く 1 OR K>7THEN7419 
7415 LOCATE 29,24:PRINT SPC〈1?) ESOUND4, 189:SODUND5, 19:SOUND 了 , 5 : SOUND 1 9, 15 
7429 SCREEN, , 9:PALET:FOR 1 =9TO 15 ヶ STEP る iC= く (1 MOD 了 ア 〉+1 

7439 LINE (16 る 91, タウ アー!1 水 。.566) (169+ 1 ツウ + ィ 1 エ ポ 。 5 る 6 る ) 。 PSET, 日 

プア 449 NEXTiCONSOLE 1,23:CLS:CONSOLE : SDUND4, 189:SOUND5。 9 :SOUUND 了 5 : SOUND 1 9 15 
7459 FORI=9T039:FORJ ゴ =1TO7: じ =(I MOD 7)+Ji IFC>7THENC = ビー ア 

74349 PALETJ, CiSOUNDS, Ji NEXTI NEXT: プ =9 =9: フフ =9』SOUNID 1 9 9 

7425 IF RND>.8 THEN 7599 

了 ア 479 U=-U: IFU く 9THENSCREEN9。1。 31CANUAS3。 1 5:LAYER4。 1 2,3:G0USUBS 199:SCREEN1 99:CL 
S9iSCREEN 1,1。9iRETURN 

ィ ァ 489 SCREEN 1,9,3』CANUAS3。 1 5:LQYER4。 1 2,3*GDSUB8 1 99:SCREEN9。 1 9:CLS9:SCREENG9。 9。 
gk:RETURN 

7599 C=INT(RND ホ 4) : GUSUB 了 る 99 

7519 U=-Ui 1FU く 9THENSCREEN9, 1 3:CANUAS3」1。 CiLQYER4」 1 2),3:』K= ニ 9 GUSUBS 1 991SCREEN1 。 9。 
9:iCLS9iSCREEN 1 1,9:RETURN 

7529 SCREEN 1,9,3:CANVMQS3。 1, CiLQYER4。1,2 3:K=9: GOUSUBS 199:SCREEN9@, 1。 9:CLS9:SCREEN 
9, 9, 9:RETURN 

7 る 99 FOR 1=9 TO 4:COLOR2 iLOCATE29,24:PRINT "MARNING ! "5 EMUS 1C" り 1405E2" 

7 る 19 LOUCATE29,24:iPRINT SPCX〈18) 』 iMUS 1C" り 1405C2" NEXT 

7 る 29 COLOR る iLOCATE29,24:PRINT "Marp Miss ! ! "ssPQUSE5 : BEEP 

7639 LOUCQATE29,24:PRINTSPC(18〉 』 ERETURN 

8999 CANUAS3, 4,5:LAYER4, 1 2 3:FORI=1T ロ 7 ミエ 1)=IiNEXT 

8919 SCREEN1, 9,3』CLS4 :GOUSUBS 1 99 

8929 COLOR3 iLOCATE7,24 : PR INT " 銘 鐵 壮 毅 凌 間 毅 間 騰 " ) 

8825 COLORSIiPRINT" | MARP! ENERGY FULL?2"i 

8939 SCREEN9, 9, 9:RETURN 

8199 FOR1I=9TO129:PSET CRND※3 1 の ,RND※189+8) : NEXT 

8119 LINE(9,8〉) -〈31 め ,8) , PSET, 了 LINE (9, 1 の ロ ) 一 (31 の 。 1 の 9) 。 PSET。 了 

8129 COLOR5S : LOCATE9,9:PRINT "SPACE BLOCK!I1= 12= |3= !4= | 弓 = | る = ! ア = 

8139 CGEN1:FOURI=9TOU5S9: ビ =〈I MOD 7)+1 

8149 IFC=4THENC = る 回 

8159 COLORC:LUCATE RND ポ 38, RND※22+15PRINT"" 

81 る 9 NEXT:iCOLOR ア 7 

81 る 5 QN K GOSUB る 999,6299,6499, ら 6 ら 99, る 899,7 ア 999, 7299 

8179 CGEN9:LOCATE9,24:PRINT"ENERGY "* 

81 ヶ 9 COLOR3:PR INT " 油 半 隊 脱 肝 朋 有 比 " ) :COLORS EPRINT" 119 

8299 RETURN 

の 999 CLS4 : CS 1 プ E ビ 3 :COLOR5, 9:LOCATE 2,9:PRINT 持 9 " 氷 SPACE PATROL ※" 

919 SCREEN9, 9,9:PQLET:FOR 1=9TD129:PSET〈RND3 12。 RND1 つ ア +2 1 5) 

の 829 NEXT:iCS1ZE9:CGEN1 :FOUR 1 =BTO59: じ = て 1 MOD 7)+1: IF に =4THENC = ら 

?939 COLORC :LOUCATERND※38』 RND※14+3iPRINT "MY" ENEXT:C ロ LUR7 

ら 94 ロ LINE(9,29) (31 ヶ , 148) , PSET, 5, Bi LINE (9。84〉) - (31 の,84) , PSET, 5 

959 LINE (7 の , 29) (7?。 148) , PSET, 5 LINE (15 ウ 2,29) - (155 の 。148) , PSET, 5 

の ら 929 LINE (23?,29) -〈23 ヶ 。148) , PSET,。 5 

979 LOCATE3,4:PRINT "MXY" iLOCATE3,5:PRINT" プ [\" iLOCRTE3, る EPRINT "へー" 

989 LOCATE13,4:PRINT "NOP "iLOCATE 13.5:PRINT "GRS "LUCSTE 13, る iPR INT "TU りり " 
9@?9 LOCRATE23, 4 iPRINT "345" iLOCATE23 5:PRINT" る 78 "iLOCTE23, る IPRINT" タ の ミ ョ " 

ヶ 199 LOCATE33, 4 :PR INT"※+。 "LUCATE33 5:PRINT"ー。 ノ /"sLOCATE33, る iPRINT "912" 
119 LOCATE3, 13:PRINTCHR 和 まま (33) CHR 生 (34) CHR 和 も (35) : LOCATE3, 14:PRINT "28." まし ロビ ATE3, 15* ピ 
RINT" 7 『 

ヶ 129 LOCATE 13,13:iPRINT"EFG "iLOCATE 13, 14:PRINT"H1J" LOCATE 13, 15:PRINT "KLNM" 
139 LOCATE23,135PRINT" く =>"sLOCATE23,14:PRINT" 2" iLOCATE23, 15:PRINT "BCD" 
ら 149 LOCATE33, 13:PRINT" い ab "ELOCATE33, 14:PR INT "cde "iL 上 OCTE33, 15:PRINT" イ ロロ " 
ゥ 159 CGEN9: COLOR5 iLOCATE 1, タ EPRINT "EE ョ th く 1) hx (2〉 M 29 〈3> NM 42 <〈(4)『" 
ら 1 る 9 LOCATE 1。17gPRINT "Rose (5 ぅ > M 31 (3④ る ) M き 3  * ア ) - SPACE CITY" 

179 LOCATE 9,29:PRINT" ア ナタ SPACE BLQ ロ CK て NO.) ニ ァ ル SPACE CITY ラ " 

の 189 PRINT "キネ ~ ャ ラク ティ カカ ニニ ノッ テ シン リャ クシ ャ ヤ カラ マモ ッ テ クタ ラー サイ 。" 

ヶ 129 PRINT:PRINT "ヨウ イハ イイ テ ~ スカ ラー (Y)」 キー ノ セ ウ メイ (EE〉 『" 

ヶ 1?5 TEMPO149:MUS1C" り 1302R9" 

299 S も =INKEY 和 も : IF S 和 も ="Y" ロ UR S ま =" ッ " THEN RETURN 

の 295 IF S ま ="E" KR S も ="e" GOSUB ? る 99:RETURN 

の 219 人 も =CHR 和 まく INT (CRND ボ アッ > + ォ 4 タ 2) +CHR 季 く (INT (CRND ネ ※ ア > + る 5 うぅ 

の 229 MUSIC "0 "+ の 生ま: GUTO タ 2 8g 

ら 599 MIDTH49:COLOR5: LOCRTE 了 , 4 :PRINT"SPQCE PATROL by ッ ELDER MAN" :BEEP 

595 COLOR3:LOCATE 12。 19:PRINT "MAIT 人 MINUTE" 

ら 2519 COLORS LOCATE 14,18:PR INT "TomTomSo 了 ft " 

?529 FOR 1 =33TO112: 人 Q 和 あ =" "IFHRJ ゴ = 1TD24 iREAD 伯 : 伯 ま = 伯 ま + ビ HR ま (人 ) 

539 NEXTiDEFCHR も て (1) = 人 名 NEXT 

?549 FORI=9TD17:FOURJ=1T032 iRERDEC ま (1) = じ 和 ま (1)+CHR ま (和合 ) ENEXT INEXT 

ら 559 FORTI=9TO る :FORJ 了 = 1TO8 iREADRRED も (1) =D ま く 1)+CHR 包 (和合 ) NEXTI NEXTIRETURN 

る 99 CLS4:COL ロ R4:PR INT" 水 交 SPACE PRTROL by Elger NMan 水 ※" 

る 19 COLQR る iPRINTIPR INT "キー ノー セツ ウメ イリ 

ヶ 629 COLOR5iPRINTEPRINT" エ コロ コロ コー タタ? = Recouer (at fu1 1 enery〉>『" 

?239 PRINT"I7II8II! 8 TarGet UP" 

2649 PRINT" こ に つ コー レー レー ア MM. Beam (at fuli1l ener ロ y)〉" 

? る 259 PRINT" エ コー コ ェ コテ rm S% Tarqget RIGHT" 

ら 22 る 429 PRINT"I41I5I12! 5 Beam" 


る 7@ PRINT* ヒー トー こつ 
2<89 PRINT" エー テー Fm 
ら る 2?9 PRINT"I1II2II3I Target DOMIN" 
人 ゲ の 多 P 民 ES こと ーー = Energ ッ ロ N" 
?719 PRINTIPRINT "SPACE KEY = MAQRP (at ful]1 enery〉『" 
2729 COLOR る iPRINTEPRINT "SPACE BLOCK DATA" 
?739 COLOR5S:PRINTEPRINT"  S = SQAFETY" 
2749 PRINT" F = FIGHTING" 
?759 PRINT" D = DaNGER" 
? ヶ 7 る 429 PRINT" = ENEMY 〈BLOCK 2- 了 ,S.CITY crushed)『" 
?7 ヶ 9 COLOR3:LOCRTE 9 23: PR INT "STQND BY OK ? HIT Y KEY":BEEP 
の 289 の S ま =1INKEY 和 ま : IF S ま ="Y" OR S ま =" ッ " THEN RETURN 
819 GOTO 899 
>19999 DQTAO」9。 9 の, 1 9 の 。 9。 1 ア 。 9。 9。 16。 5 づら ア 1 らら) 53, の 5。 9, 9。 9 ロ 。 9。9。9。 9 
19919 DAQTQ9。 1 る 6, る 4 4 9,84。 9, 33, 1 る, 12 つ の, つ 45, つら 3。12 了 7, らら 55, つ 55, 1 アア, 9, 9 の, 9, 9。 9 9, つ , 9 
19929 DQTQ9, 9。 9 る 4 1 る 12 ウツ , る 4。 9 9d, 3 つら 」9」8 ロ 。18B6, つ 4 ウ , 243。 1 9 る 」9, ロウ 9, 9, 9 9 ロ 
19939 DaTQ4 9, 128, つ 」9,29,32」9, 13, 3, 13?,87」12 1 125, 253」186,」 9g。 9』9, 9 9, 9 9。 1 る 
19949 DATA6, 4, 32, 8, 9, 1 139。 1 23 の 」196。 1 。129,224」2 1 1 253, 247, る 4 9, 32 8) 24, 128,34, 9 
19959 DQTQ9, 34,9, 128」 9, 9, 9, 9, 182,246, 236, 224」 1 の 4, 168」298, つ 48」 9, 9 る 4, 9 9。 9。 9 
19969 DaTA1 9, 134,9, 9, 9, 9 9) ウツ 3。187, 55, 6 ア 」) ) の 9。 の 」9。 9」9。 9 9, 9。9 
19979 DQTA16,9。 9。9, 128, 9, 9,」9, 123」181 , つ つら 。1 の 2。1 ア る 。 1 の つのる, 9。 ロロ, 9 ロ 。 9, 9。9。9。 9 
19989 DATA12B,9,9, 9, 9, 9, つう 32, 249, 169」 65。136, 9 9 ご, , 9。 9, ロ 。 12B。 9。 9, 9 3 ご 
19199 DaTQ9, 131, 5, る, 9 32 9, 9。 る 。14 1』 つ 。 13。 る 。9。 ロ 。1。 139。 了 」 2, 9 32。 9 9 
19119 DaTA9, 1 る 。1。 7 ア ,31,52, タ 9』。173,」9, 128,128」。 1 2」1 1,53。 1 の 2。9」 1 る 6。1。 ら 2 1 4 る 6127, ら 55 
19129 DATA24。1 1 る 6,248,224,48,249, 248」244, つう, る 2。124, 259, 245, の 4 」17 ア 5, つの の, 9。 64。 128) 9。 
9, 128, 9。 る 4 
リー19139 DATA9, 9 9, 3, 23。1 9 の , 4 る 。1 1, 9, 32」 9。 1 35, 87, 23 1,」 6 の 2, 9。 9 3, 23, 43」 1, つ 
19149 DATA1 18,27。14,181,234,85, 17 9。 8 ア 」125, 158。13」129, 253」 ご 59,244, 259, 127 了 ,。 15?。15。 
1 1 , の 55, 2 つ 55, 254 18 
19159 DATQ234」1 1 る 6, 248,89,。 1 アプ 6, の る 24.9, 2 1 る 。 ツア 5」 1 の ロ 。 1 の る 6, と 3 ア 。 1 ご ご 。184,88 244。 1 る 69, 1 の 2。 1 る 
9, 249, 1 の 2。1 ツ の, 1 る 69,8 
191 る 9 DATQ24」2 ア , つ る 。4 ウ ,48」 1 る 9,48。 9。 143」。13。1 王 」15, の ウツ 。 どら 」 ど 9 18。1 ア 。 1 は 。 1 る 6, 32 32」128。 9 
9 
19179 DATQ172, 221。184」 88, 33」 9 9」9, 253。」 1 1 了 ,」252。 259」1 1 る 6。 1 る 9, 9, 9,89。168。 1 る 』9。 9。 の, 9 
9 
19189 DATA224 12, 32,298。 1 の 2 つ 」 12 つ は, ロロ , 32」186,。1 9 ヨロ 。 176」124,24」4」 9, 9, る 4。128, 9, 9, 128, 9。 
9 32 
19299 DQTQ9, 9, 4,」9,32,9,8, ツ は 」9」9,4」9」1。9。1 9, 9, 4,。 9 ロ 。 32」 9。 9, 9 
19219 DQTA9,9,9, 9, つの, る 1 129。1 1。1,3,21」188, 125, 253, 248, 93, 9, 9, 9, 9, 9, 12。24,7 ア 4 
19229 DATA9,9,128,89, つづ 2。 1 1 る 6, 194,52」 ウ っ, のり) 2 つら 254 , 5」12 ア , つ 54」12 ア 9, 2」9, 9。 9 の, 64。 
32。 9 
19239 DAT 人 29, る 5」2Z」188」54 124。 の 6」 1 のど 」9。9」 9 の ツウ の ュ の 。。 1 9。 1。 16, 8 28, 8 9 9 
19249 DATA18,124。195」17。194,2 つ 42。195, 4 の ,1 18。125, 253, 187, 25 1 24 了 。 235, 243」 9 5, 2 の 。1 
1 25, 1 136, 9 
19259 DATAB」128,124,24,249,24 る 88」148, る 3。142, 2 つ 54 , つつ , 254 , つ 55, つこ 5 , 2 つ 54, 9 128, 98 つ 2 
24 169, 2 9。 1 る 
1 9 の 69 DATA29。 1 9 る 6,4。 16」9,。 ロ 。 ロロ, ご りり,。 ロ 。 9。 ロロ 。9) 。 ご 。 9。 ロロ d) ヨロ 。 の 
19279 DATQ1 る ,。 9, 9,9, 9, 9, 9, 9, つ 4 ツ ,。1 の 5, どら, 4」 ロ 。 ロ 」9。9」 9 9,」d,」9, ロロ 。 9 
19289 DATQ9, 9。 9, 9, 9, る 4」 9, 9 どの の 」。1 7 の 」。15 ロ 66」 1 る 』。 9 ロロ 。 つ 」 ロ 。 ロロ 。 ロ 。 9, 6 ら す 4。 2 
>19399 DaTQ9, 9, 9, 9, 9,」9。1」 dB,。1, 9。 ロロ 。 9。 9。 9。1, 9。9。9, 9d。1。 9 
19319 DATQ9,」 9, 48, ウ 7, 297, 9 ら 」1 プ 3。17 ロ 。9,」 ロ 。 9,。 9, 5,。 ご 」1 ロ 。 の, ロ , 32。 65。135, 149, 43, 175 
19329 DATA9, 9, 88, 229」 259, 5 る 6, 84」17 ア 9」 9 9, 9 9。 9』」 gd) る 4, 9 9, 89」。164。 の 9。49, 4,1 ア 9 
19339 DATA1。1。41。129,124,232」 タツ る , 48」9。 の 9。 1」 9。 16) 5 る 」 ロ 9。 1 。 1 。 1。 99, る 。129。 32。 1 る 
19349 DATQ18 タ ,」151,29 ア 。 1 の 5。123, 127 ア , 69, の 4』 ア の) 8。 9 の, 1,49) 9。 17 呈 , つう, アオ 4 12 の 」 の 1。 1 1 の 4 
4。 24 
18359 DATA178。189, ア 8,。1 ア る 」149」 了 る つ 4」 アツ ら ) コ 2」 ロロ ) づら 」 9。12 ヨ 』4」16。9。178, 3 る 」 の 8B。 1 の る 。13 く る 了 る 。 
24 6 
19369 DATQ24」4」 9。9」9。9, ヨ 9, 9, ロ 。 9。9, 9。 9 8」9。 1 る 4) 9, 9。 9 8, 9 
19379 DAT33」 る, 1 アプ 6 る, 9,」9, 9 9,。9, 9, 9, 9, ロロ 。 9」9。 9,」 3 づ づ 3) ら 。 1 アプ 6。 9。 ロ 」 ロロ 。 9。 中 
19389 DQTR2 98,9, 9 の, 9。 1 ら 6, 9。 9 ロ 。 9) ロ , 9。 9 16。 9 は 。1494」 ロ 。 gd。 9 9。 1 る 6, 9) 8 
19499 DQTQ1 ウ 2, つ 49。188, ご づ ウ アツ 4 1 9 ツア, 4 る 6) 53」 9 9) 16」136」 14」 の 4。 1 。 1 つど 49。18, つう ツ , の 4。 1 
5, 4 る 53 
'19419 DQTQ32」9, 9 の 9, る 64, 1 の つづ 3 18 ご 」 ロ 。 9, 9』 ロ 。 9。 ロ 。 ロコ ど 」 づ ご 」 り 」 ロ 。 9 ら 4。128。1 ロ 9, 18 ど 
19429 DATQ9, つ 24 , どら 4 」 224」 4 9, 9, 9』」9」 ロ 。 ロロ, 9, 9」 9 ロ 』。 ロコ ご 。9』。 ら 4, る すら 邊 4) ロ 。 ロ 。 づら 
19439 DQTQS3」2 ア 1 1 13 る, う 3」 づ づ 」 9 りり 。。 ど ) の ご 」 9 づつ 2」 ロ どら 1 どら 」19。 13。 る らき ぅ 33」 9 
19449 DATQ16 る タタ 4。175。19 ア 163。8 1。1 ア 79, 18 ア 。 1 の 2。244, 129, る 2 254 47,31。162, 233, 24 る , 253 
ぅ 12 る 6, 255」127。15?,183 
19459 DATA9,。128, る 4」1 る 4」。1 の 2 つ 、 ら 298, 232」 1 る 8,」 9, 9 9」。 る 4。 9。 ロ 。 12B。 9。12B。 る 4, 1 る 4。 1 の 228 コ 9。 23 
ら , 168 
「 1 94 る 9 DAQTQ9」 9。9。 1 る 6。9 ロ 。9, ロロ, 1 つ 8, 9 り , 9 ロロ 。 1 っ 。 9」 9 り ,G。 ロ 。 ロロ 。。 ロ 。。 ロ 。 9。 1 ご 
19479 DATA 1 , 46, 1 の 。18。 13, コ ご 。 9。9。1 プ 」9。1 づ 3」1 つ 。9。9。 ロウ 。 う 8』 つ アツ 」14。 1 3 ご 。9。 
19489 DQTQ244 , 2, こさ ご, 4」 つらら 」1 つ ア 。 さ 1。 了 アイ 。144」 コ つら ょ うつ 」 ロロ,。 う ュ ア の 」 ロロ 。 1 。 1 中 、 コ ご 」 ご づら 、54」 つ 14。 1 ご ど ア ご 
2 記 』 
19599 DQTA9, る 8。9, うら, 4, 9 8, る 6,。 ロ 。 9。 9, 3 ご 。d。 9 65, 9) 4) 3 ご 」 4) 9) 9。 こら 5 
19519 DATQ32」4」16) 17 ア 9, ツ , 43, 3」。 9』」16。 1 9, 9。 34」 9。 9 人 す 」 1 る 」 1。 る 81, 492 1 
18529 DaQTQ13 る 」 9, 8 18, の る 6, 82」1 る 9」216」9。』。9。16, 9。 9 どう ご, 64, 136」 gd, 6418」1 る 9 了 ご 
19539 DATA9,。 17, 4,3 ア 7, 1 1。37」13 の 」1 1」。 1」 9。d。 ご 」 9。 1 の 2 の 。、。9。 17 ココ 」19。 37。 1 つの 。 18 
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DATAS, 42。138 る る 689。 1 る 65, つ 98。1 ア 9」1』 9 9 6 る 。 9。164。 1 る 6。 128。5,34 13 る, る る 。16。 165 89 


DQTQA224,291,144。199, 0972, つ 9, づ 2 お,128。9」9,」8。 9。 9, 169。 73。128。 3 ら 6, 9。 72。 9 9 
DRQTA37, る , 32」19。128」36』1 8 9 4」9, 9 128, 36」9。 9 33。 4 , 32。 19。 128』36。 1 
DATAS 1 , 68。 1 る 1 8 632。 16。 9 65」9。 161,8。 9 9, 9。 9,81,4。 1 る 1,8,64, 9, 1 る 6) 9 
19589 DAT9, 9,4, 9,32,8。9。 1 9 94, の 9。 9, 9 9, 1。 9。 9。 4, 9。 づ 32, 9, 9, 1 
19 る 299 DRATA1 ア 31』5 ア 。 4 プア の 5。127。 255』9」 1 る 6) 1。 12。 了 ア 。 さ 1。 1 の の 』 1 ア 。 23」 4 アプ 31 1 12。 の 255 
19 る 19 DATA255, 254 , 55, 2 つ 5』 2 つら 5 ら 5, つら 5 , つら 5 2 つ 55』 1 つる 」15 の 」1 つ る 。 つ 55, 254 248,156, の 6 らら 55 ら 55 
ぅ の らら 255 254 , 255 252 39 
19629 DATQ128, 224」184 つら 2 つら 。 254 , 254 。 つ 55。 9。9。 る 4」12 つ 8」9」 9 32」 る 4』128」224 232』212』 ア 
2, 54,59, 73 
19239 DATQ17 ア 5 つら 5, つら 5 らら 1 , つら 5 の 55, 255 24 プ 。1 7, 52。 1 9 る 21。 139, 134。1。134 255, 254 255 
4。 183,242,254』1 タ 1 175 
19649 DATQ255, 255, 255, 255 。 こら 5 55 253。 254。 さる 』 の る 」148」 64」 176) 76) 51」 1 の 3」 1 どら, 224。158 
> の 3。187, アタ 55 297 
19 る 659 DATQ255 , 255 , 255 , 255, 255, 253」 2 つ 4 ウ 』。127 ア 。17 る 。 アラ る 4 づら 」9。 る 5。169」153, 245。 了 2」 る る 33 
> 1。 1 の 3。16 る 124 
19269 DATABS7,197, 63 55 3 1 プア 。 1 9 3。 1 9, 9。9。 9。9。9。123。87,」 41, 45 22。 了 ア 。1。9 
19679 DQTA252 253 248, 23 1 , つつ きつき 9 つら 5」9。 5 1 。 1 ツウ つ 。 5 ア 。 9 9 り 。9。 1 14, 9, ご 43, 254。 つ 55』 88」1 る 9g 
ぅ 121 255, 9 
19689 DATA62 126」28」149, 129。 122。128。 9, 158。8, 9, 9, 9 9, 9 9 158, 39』 236』1 16。168, 1 る 9』1 
28, 9 
19799 DATA9, 9,8, 28, 28,8,8 の 」 99」 の 9。 69, ら 9 24,24」 2 1 の 。9, 9」 9,24,9, 9 9 
19719 DATRS9,」126, る 9,24,24,24,25,69,4,2,4.8,8,8,8, 4 4 4 る 6, 4.8,8.8, の,4 
19729 DATA9g, 2 ア 7 3 1,4,4, つ 28, 2 つ 44, つつ 28, 9, 9 9。』9。 9, づ ご 。16, づ ご 9, 9,4」9, 9」 2 ご 4」 1 る 』 2 と 4 
19739 DATA1 1 。 1 1 アツ 。1 1 , ら ツウ 。 1 つら 。 1 つら 5。 1 つる 9, つ 。 つ 了 ア , つ 。 1 の ら 。 つつ 」9。9。9。 9。 る 。125, 3 る 。125 
19749 DATQ188」188」126, 254 , つら 5 , つらら つら 5 ご 5。 13 つ 2」。1 コ 2, つら 。13。 139,』 16,9。 16,52 4, ど 」122) 2 
ぅ ど 43。 6 る 6 243 
18759 DATQA68, 78。1 1 る , 2 の 52, 252, 254 , つら 4 つ 54」9, 9。 1 る 6 は 9, ご 」 ロ つら 4 ら B。1 12, 248。 7 らら 54 72 


ーー 
ee 
GOQQ ビ ご ーQ 
Un ひひ 
JO ひ OOMN は ト 
SQ し 】 

トン ノ 


19769 DATA255, ? ヶ 1 , 255」127。 6 る 3」15。1 ア 7, の 6。9。164。9。 127。 9 99, 9 9。 9, 9, 9, 9, 9,9,9 
18779 DQTA25S5」189 , つら 55, の 55 2 つ 55 , つら 5 つら 5 , 1 2 る 9, る らら 』 9 つら 5。9。 9 9, 9, 9 9, ロロ, ロ , 9, 9, 9 
19789 DQTAZ55, 2 18, つら 5, 254 , つら 52, 249。 136。 ら 。 9 コア,。 9, つら 4 』 ロ 。 9, 9。9。 9 り , 9, 9。 9。9。 9。 9 ロ 。 の 
19899 DQTAO9。9, 9,。9。 9, 9, 9,9, 9 の, 18,49, ご 。 昌 16」 ア 4。 の 9。9。 9 り 。 9 9。9。 9。 9 

19819 DQTQO,9,9。9。9。9,。9。9,49, つら,5 つ 816, 8 ご つら 。 2。 ロ 。9。d。 ロ 。 ロ 。9。9。 9 

19829 DQTQ9, 9。 9, 9, 9。 9,9, 9」9, ア ご つ 。9,4。 1 る 69, つり 9』。 ご ご 4。 9。 9, 9。 9。 9。9, 9 

19839 DATAO, 9,9,9」9,9, 9。 9, ご 9。1 ピ 9。 1 の 。 14.85。58, 43, 8 る, ロロ, 9。 9 の 9。 9 9。 ロ 

19849 DQTA9, 9, 9, 9, 9, 9, 9 9, 149,。 176。 198, 134 83。173, ヨ ご 173。 9」 9, 9 9。 9」9, 9 ロ 
19859 DATA9,」9, 9,」9, 9, 9 9, 9, 4, ら 4,86」168, 了 6」 1 14。136, 1 9 ご 9, 9 g) 9 9 9 9 

1986 る 9 DATQA37, 1 の 9, ツウ, 38, 22」1 1 1 」9。 19, つ 2 の 」148」 63」 4 1 4。16」 コ 2」 9」 ロロ 。 ロロ 。 9 9」 9 
19879 DATA191,296。197,。 154,296, 5 の 」1 19, タ 9。14 ら る, の 8148」 ご ど 55) 4 ウツ 」1 の る 。145, 6。 9。 9 9」 9, 9』 昌 


19889 DATA144, つ 55。 48, つ 99, 2 16。 ウツ 6。 1 つの 9。 アオ ュ コア 。1 コ の 254 3 る 」144 ょ 4。 9。 の 9,」 ロ 。 の 。9』9, gd。 9 9 
19 ウ 99 DQT4 , る 6 3 る 829 34 , らら, は 。133。 ご) づら, アロ ュ ご 9」5。 ら ツウ 。 1 コア, 132 ご, る, アウ 9, ど 9 59』 6 の 。1 


19 ウ 19 DATQ9。9,54, つ 9,49,54」。 9 り 』。 9。 1 アツ 」1 つ 7。127。 1 の の 。 1 つら つら 5 24 プ 。 19 る 。 1 アア 12 ア 。 127。 18 ど ご 。11 
9, 255, 247』1 96 

19?29 DATQ9, 9, 09, 9) 8 は, 9) 9, 9。 の 。 3 る 6」 の 9。 44」 の 3 44,。 138」89 , 36 74 36) 73) 36) 138」89 

19?39 DATAO,」 9,」 9 9 9。 9, 9, 9,33, の 9 2 1 。199, 154, 3 る 52 る 6) 33」 了 アジ 2 1 32」1 38 32 29, る 6 る 
19249 DATQ9g,9, 9,d。 9, 9, 9。 33, 6 ら 8, 1。 12,32。148,』 17, る 8。 9, る 498 9, 16。 9。 9 

1 9》59 DRTAO」9,」 99, りり, 9 9。 ロ 。 9。9, は,。 ロ 。 ロ 9, 9。 9。9, 9 は, 9。 ロロ 9 

ら 9999 DQTQO」 9。9, d。 り 。9, 9, 9 9 9, 9。 9 けり 。 9。 の, り 。 ロロ,。d。 ロ 。。 9。d。9。 9。9。9, の, 9。9。g。 9 

29919 DQTA9」9g, 9 9 8。 の) ご) 4 アウ 。19」 4」。 16」 のり 。 ロ 。 ロ 。 9 ロ 。 ロ 。 1 ご 1932 ご 4 コ 2。128,48。12, る 43 
ご ) 1 る 6, 9。 9, 9 

ら 9929 DQTA9, 9, 1 る は, は) ご 1 3 75, 3。 1 ロ , つづ 5」 ヨ , 8。 1 る ロ , 9。 6 ら 4」。139。149, 98, ご 3 ご, 128,48」29 
9, る 4,48」149,2, 9, 9 

ご 93 コ 9 DATAB,」 9, 23,49, は 9, は, 24 アプ 4 コア ィ ア の) プロ 。 る は B。 き は 』」 アツ 」 1 る 。 9。 9。 9。 の る 。146。 149」52』 68。138) 4 
8 149, る る 」 178、 1 ご 32 1?2。 9 

ら 9949 DTB」 4 プア 。 1 る 。1 24。 12 つ 8。14 タ の,」 1 ココア 4。 3」 アコ) 了 アロ 」 の 34」 1 4 ウタ 」 18。 12) 64」2 ご 4。164』139。16 ら 。 
92, さる) 138。1 7 コ る 6」 るる,」 4 ジュ アプ ご ュ ウマ 」 144。199 

っ 985 ロ DAT 人 OO ロ 。 うつら 」。 ア ご 。 1 ご 日 。 ご 。 1 ご 王 , 弓 。 コ ア ィ ロロ 」 る らら 。 1 る 6』。 コ ご 」1 コ ご 。 1 は BB』 ら 4。 1 る 』 13 ど 。 16 ら 」139。 1 る 6」 コ 86』 1 
づり 。 1 る 」 コ ご 、 ら ら 」 す 9 ら 4、B、1 ら 」 ら ヨ 

ご 9969 DAT 人 4」 1 る 。 ロ 。 ロコ 4。 ロロ 。 4」 る 5。 1 る ら 」 4, ココ 9。 4」。 1 る 」 1。 9』。 ら 4、 1 る 6」 る 4」。 ら は 」 は 。1 ら ご 。1 ご 8」 9。 13 ら 


1 る 」 さら 。 日 

ら どら 987 ロ DQT 全 ロロ 。 1 。 1 ら 。 ロ 」 ロ 。 中 。 ロロ 。 ら 4。。 所 。9。9。 1 る 。 日 。 は 。 1 づら 」 ロコ どら 」4。 9) 6 ら 4。 ロロ ど ) 9 の) ら す 。 
@ 

らら 989 DaT 白 9。 ロロ 。B, マ る 。 1 る 14。 マ アイ ュ コア 12 の 。 1 こと 。 ア の 。 日 。 ロロ 。 ロロ 。 ロロ 。 9B。 ら )B。 31 ご ご 1 る 6』 ご 1 ら 。 1 12。8。 
ら 」 ロロ 。 9 


299 の 9 DQT 人 9」 9, dB。 ロ 。191。 1 ツウ 3。 ロウ 。 つ 、4 コ 1 ア 。 1 dB。9。。9。8」 ロロ 。 9。 1 らら 。 ご ロロ 、1 ヨ 6。 つら 9。 234。 
ご 1 ど 。136」 4」9」9」 9。 8 

19 D 和 合名 。1。3」 ら 」 1 1。 ご ミ 43。 は 。1 1 9。 コア 」 ロロ 日 ロロ 。1 ど G。1 ア ご の ら 。 ど 8。168』 ご 182。179。11 
ら 」1 5 さこ 」 9」 9。 9 9, 9 

11 D 生 て 折る 3。1 ツェ アコ 1 コロ 、1 1 ロコ 。 1 は アプ 」 ら 2。 1 ロコ 。 は 、1 1 ご ココ 日 ご 4 ロ , 8 昌 」1 了 6』 そら 6) 1 ご 8 
は) 中) 9) ロロ 9, 8 

ご 6129 DTB」 1 ニコ, つら 。 ヨコ ュ る 。 1 、 コ 。d。 9。 ロ 。 ロロ 。 の 9、 昌 ロロ つ ニ ご 。 1 ご 。 ら 。1 の ロロ 。 1 1B。 1 プロ 。 ご 1 42。 ご ら ュ 
ご さら > 1 人 4 は 9, @』 日 

ご 613 ロ つ折 TH, ご) ご 1) らく 1 ロッ ご 1。 19。 ら 了 。 ロロ 、 ビ 。 ロビ 。 ロロ 9。 らら 。 4」 1 で は 。 マ らら) ロロ 。 16B。 38」1 ヲ 4 9 
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ぅ 9。9, 9。9。 9 
298159 DATRAG,」 9, ご は 。 つ 。 1 。 ロ 。 ご, ご 5。 gd。 9。 1 づり 。 ロ 。 のり 。 ロ 。 ロロ 。 り 9。 1 ア ら 。 ご らら 3 1 。 つう どう 3 1 , の 52。 
128, 9, 9, 8 

ど 9169 DRQT9, 9, 9, の, 9」13, る 63, 24。18 コ 3, ご 4 ア ,248) る 3。1 。9, 9, 9, 9。』 9 る 』」 64」128。 9 9。 169) 4 る 4 
) 16 る 9, 9, 9, 128。129, 9 

@9179 DAT9,」 9 1 12,8」4 53。 1 9896) 53」 14。 1 19」17。 14」19,。 17。 の る 」 9。113」143, 2 る 6。 15, 131。 1 の 。 
175, 8 の , 233』 の 5, 45 7, 3」 123, 9 

29189 DATA9。142, 24 1 , 8,249」 1 の 3, つつ ア 。 245」14」 1 1」 つ 59」18, つら 4。1 の 2。131。 9。 9。 9。14。 16 る 3 
2。 172, 8 る 6」 17 プ 2。 1 12。 118。13 る 。1 12,89。13 る 6。 9 

どら 9299 DQTAO。 9。 9。9。 9。 9。9。9 

ら 29219 DQTAO, 9。 192, ご 4。192。9,9,@ 

どら 9229 DAT9,」 9, ア 9,69, ら 9, ツ 9。9。9 

る 9239 DATA9」 9 3 る 6, の 4, 36, ツ 9。9。 9 

ら 9249 DQTA24 る,」 1 12,248」 248」, 1 12,5 ら ) 24 

29259 DATA9, @, 9, ご 1 ウツ, 255。126, 69。 24 

どら 9269 DRTA24, る 9, 2 る の 2555 2 1 タウ,」 9 9, 9 

39999 DQTQ-C9,- ビ 。- 柱 じ 。- 提 に ビ 。ーD。-D ヵ - 柏 D』ー 柏 D』。- ビ ビー ビ 。ーF 。-F 。- 村 F 。- 杜 F。- は 』- け は) - 柱 は 。- 提 G 

3919 D 全 和合 - 向 。- 向 。- 杜 合 。- 提 合 」- 日 。 日 じじ に ビ 。 柏 じ 。 DD) 持 D。 拉 D」 ビ ピュ ビ 。F) 柱 F。 提 F。GG 

39929 DiQT 谷 福 は 。 祝 は 向谷 。 栖 向 林 各 。 日 日, すじ ビュ ビュ + 提 じ 。+ 柏 ビ 。+D。+D 。+ 提 D。+ 柏 D。+ ビ ピュ + ビ ピュ +F。+ ド 

39939 D 馴 谷 + 柱 F 』+ 村 。+ け は 。+ は 。 + 柏 詞 。+ 欄 は 。+ 向 。 内 。+ 杜 向 。+ 相 向 ,+ 日 。+ ロ 。 + ビ 。+ ビ 。 日 。+ 昌 。+ 日 。 + 日 

5S9999 IF GD=1 THEN RETURN 

59995 PLAY 399 : RESTORE 59939 

5S9919 READ M 和 も : 1F MM も ="※" THEN RETURNI 

59929 PLQY NM 和 ま :GOT ロ 5S9619 

59939 DRQTA" り 13』 り 13: い 15 

59949 DATA" ロ 7C1RCRCRCROUSE 1R4G1R4:03CSR3C2R 101C3R3G3R3: 05CSC2C 9D 福 DEF 

59@59 DATA"U7C1RCRCRCRUGE 1R4G1R4 i03CSR3C 1R 102C3R3G3R3 :GBG1R 1G2R9 

589g69 DATA"02B1RBRBRBRU6D 1RK4G1R4 1 り 1203DSR3D 1R 102D3R3G3R3』D 1R2D 1R2D 1R3D 1 R 1RSD 9R2 
59979 DATA" ロ 6B 1RBRBRBRO2D 1R4G1R4: ロ 3DSR3D 1 R 102D3R3G3R3:E2R 9R る SD3R る 

59989 DATA"07C1RCRCRCSODGE 1R4G1R4 : り 1303CSR3C 1R 102C3R3G3R3 : CBC2C 9DEFG 

599?9 OQTA" ロ 7C1RCRCRCR ロ SF 1R4 人 1R4:03CSR3C 1R 102CSR3A3R3 1 QZA3R3G3R3 

59199 DATa"0O7C1RCRCRCRUGO 1R4G1R4: ロ 3CSR3C1R 102C3R3G3R3*F 1R2F 1R2E 1R3D3RSE GR2 

59119 DRTA"OSG4 103 に 5 に 5"。 ポ 


通産 省 国 家 資 栓 。 情 報 処 理 技術 者 。 


国家 試験 対策 通信 講座 


@ 早 い 準 備 で 合格 へ / 今 か ら ス ター ト 。 あ な た も / 
文 受験 予定 の 万 は 必読 / 合格 資料 を 無料 呈 / 


例 実 務 教 育 研究 所 受験 講座 情報 係 
160 東京 都 新宿 区 大 京町 4 一 383 


人 @ 情 報 処理 技術 者 は 不足 / 

コン ピュ ー タ の 技術 進歩 と 設置 右 数 の 急 
増 に より 、 情 報 処理 技術 者 は 不足 ./ 

@ 国 家 試 験 受験 準備 講座 を 開講 中 / 
実戦 即応 の 教材 と 実戦 模試 ・ ポ イン ト 指 
導 で 合格 力 を 養成 。 早 い 準 備 で 合格 へ 。 
供 将 来 性 の ある 情報 処理 技術 者 ./ 

企業 ・ 官 庁 で 有 資 格 者 優遇 。 学 生 に 最適 。 


念 受 験 資格 は 不問 。 誰 で も 可 ./ 

受験 資格 に つい て は 、 学 歴 ・ 年 齢 ・ 性 別 ・ 経 
験 な ど は 問い ませ ん 。 試 験 地 は 全国 9 都 
府 市 で 行わ れ ま す 。 4 科目 の 筆記 試験 。 
信 擬 2 種 情報 処理 技術 者 国家 試験 の 合格 
の ポイ ント は 、 早 い 準 備 と 限ら れ た 時 間 
を ムダ な く 効 率 的 に 活用 する こと で す 。 
食 資 料 希望 の 方 は 、 ハ ガキ か 電話 で ./ 
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は じ め に 


「X 1 」 は , Sharp の 「Visual Integra- 
構想 の 一 環 ほ し て 生み 出さ れ た 意 
欲 的 な 製品 で す が , 残念 な が ら , コン ピュ 
ー タ 間 の 通信 で 主流 ほな りつ つ あ る シリ ア 
ル 伝 送 の イン ター フェ ー ス を 持っ て いま せ 
ん 。 そこで, 手始め と し て シリ アル 伝送 イ 
ンジ ター ジェ ー ス を XX 1j に と いう こと る で 。 
今月 より 数 回 に 渡り , ハー ドウ ェ ア 入 門 と 
いう 意味 も こ ゅ て , 初心 者 向き に , な る べく 
や さ し く 解説 し て いき ます 。 どうせ 作る な 
ら , も っ と 機能 を 増やし た い の が 人 情 で す 。 
シリ アル と くれ ば パラ レル が 思い 浮か び 
ます 。 パラ レル イン ター フェ ー ス に は , A/D 
変換 器 、D/A 変換 器 . ROM ラ イタ な ど を 
接続 する の が 便利 で す 。 さ る ら に , TV カメ 
ラ よ り 画 像 を ディ ジ タ イ ズ し て V~- RAM に 
取り 込む 装置 の 製作 も 予定 し て いま す 。 


ハー ドウ ェ ア の た め の 
基礎 知識 


ハー ドウ ェ ア の 製作 と 言え を ば, ハンダ ゴ 
テ を あま り 揚 っ た こと の な い 人 に と っ て は 
非常 に たっ つき に くい と 思い ます が , 慣れ 
て し まえ ぇ えば, ゲー ム の ソフ ト を 作る より も 
ずっ と 簡単 で すし , 自分 の 製作 し た も の に 
は 愛着 が 湧き ます か ら , マイ コン を 大 枚 は 
た いて 買っ た けど 結局 は ,「 マ イコ ン と は ゲ 
ー ム マシ ン な り 」 な ど と 悟る と いう よう な 
こと も な いと 思い ます 。 

必要 な も の は , シャ ー プ より 5 発売 され て 
いる 扱 張 1/O0 ポー ト と 1I/O デ ー タ 機器 より 
発売 され て いる 44PIN の カー ド エ ッ ジ の 出 
た ユニ バー サル カー ド で す 。 こ の カー ド エ 
ッ ジ の ピッ チ 幅 は , 0 .1 イ ンチ (2.54mm) で 
す の で , KEL と か 亜土 電子 な ど て 売ら れ 
て いる 少し ビッチ 幅 の 大 きい カー ド は 流用 


tion」 


人 ( 


で き な い の で 注意 し て くだ さい 。 

「X 1」 は CPU に Z-80A を 使用 し て い 
ます か ら , 各種 の イン ター フェ ー ス を 製作 
する 場合 に は , 当然 Z-80A の 電気 的 特性 , 


タイ ミン グ な どの 勉強 が ある 程度 必要 で す 。 


また , 高速 1/O 装置 ( 例 , TV カメ ラ 高 速 シ 
リア ル 伝 送 ) と の 接続 で は , 割り 込み 処理 
も 必要 不可 決 と な っ て きま すし , 割り 込み と 
並ん で DMA (Direct Memory Access) 
と いう 概念 も る きち ん と 理解 し て いな けれ ば 
な り ま せん 。 BASIC と 同じ よう に これ ら 
の 割り 込み , DMA の 考え ぇ 方 は , CPU に 
共通 な る の で す が , 細部 に な る と いろ いろ 
な 個性 が あっ て , CPU が 異な る と 理解 す 
る の は 大 変 で す 。 割り 込み も DMA ゎ も 共に 
フラ グ ・ セ ンス 方 式 (/0 アド レス の ある 
番地 の 内 容 を CPU が 読ん で , デー タ を 1/O 
と の 間 て 送受信 す る 方 式 ) で は , CPU に 
と っ て 荷 が 重い (フラ グ を 読ん で いる 間 に , 
入力 デー タ が 更新 され て し まう と いう よう 
な こと も ある ) と いう 場合 に 威力 を 発揮 し 
ます 。 

た と えば, NEC の PC シ リー ズ で は 画 
面 制御 に DMA を 使っ て いま す 。 東芝 の パパ 
ソ ビ ピア 7 で も キー ボー ド か ら の デー タ の 読 
み 取 り に タイ マー 割り 込み を 使っ て いま す 
し , FM- 7, 8 で も デュ アル CPU の 通信 
に DMA を 使っ て いま す 。 ち な み に 「X1」 
で は , キー ボー ド か ら の 入力 に 割り 込み 処 
理 を , 最 下 位 の 優先 度 で 行なっ て いま す が , 
サブ CPU 80C49 と の 通信 は , 2 個 の PPI 
(Programmable Peripheral Interface) 
8255A で フラ グモ セ モンス 方 式 で 行なっ て いま 


* シ リア ルイ ンタ ー フ ェ イ ス の 有用 性 に つい て 


井内 秀則 


す 。 画 面 制御 の と きも や は り , フラ グセ ン 
ス 方 式 で , ディ スプ レイ の プラ ン キ ング 期 
間 を 利用 し , 画面 に ノイ ズ が 出 な いよ うに 
V-RAM を アク モス し て いま す 。 こ こ て 優 
先 度 と いう 言葉 が で て きま し た が , 優先 度 
は , 割り 込み 、 DMA を 使う と き に 共通 し 
た 重要 な 概念 で わる こと に 注意 し て くだ さき 
い 。 通 常 は 優先 度 が 問題 し な る の は , 割り 
込み の 場合 だ が ほとんど で す 。 し か し S-100 
バス と か 。 イン テル の MultiBus, モト ロー 
ラ の VersaBus な どの 規格 され た バス で は, 
マル チ プ ブロ セッ サ の 使用 (た と えば Z- 80 
と 8086 を 使用 し て CP/M-80 と CP/M- 86 
を 走ら せる ) を 想定 し て 設計 る れ て いる の 


で , この 場合 に は DMA の 優先 度 と いう こ 


と も 問題 し な っ て きま す が , あま り 一 般 的 
で は な い の で , 割り 込み に お ける 優先 度 に 
つい て 話 を 進め まし ょ う 。 


割り 込み の 優先 度 


特に , 今回 の 「X 1 用 イン ター フェ ー ス 
製作 」 で は , シリ アル イン ター フェ ー ス 
8251A 用 の ボー レー ト 作 成 用 カウ ンタ と し 
て ZZ-80ACTC (Counter Timer Cont- 
roller)、 PIA (Peripheral Interface 
Adapter) に -80A PIO を 使う 子 定 な の 
で , Z-80 で 新しく 付加 る れ た 割り込み モー 
ド で ある Mode 2 イン タラ プ ト を 生か す た 
め に は , 優先 度 の 制御 を する ロジ ッ ク で あ 
る ディ ジー・ チ ェ イ ン (daisy chain) を 理 
解す る 必要 が あり ます 。 

ディ ジー・ チ ェ イ ン の ロジ ッ ク を 図 1 に 
示し ます が , 内 容 は 非常 に 簡単 で , 左 か ら 


た と えば 8 イン チ の CP/M フロ ッ ピ ー を 自分 の 5 イン チ の フロ ッ ピ ー に 落と し た いと か いう よう に 媒体 の 異な る 
ファ イル の 変換 は , ほとん ど RS-232C で 行ない ます (この プロ グラ ム は DOWNLOAD. COM と 言い , その 逆 は 
UPLOAD. COM で ある )。 あ な た の マイ コン が 大 型 機 の 端末 と な り ま すし , 他 の 自作 ワン ボー ド マ イ コン の タタ 
ー ミ ナル と し て も 使え ます し , 製作 が 簡単 な 割 に 非常 に 役立つ も の で す 。 


グ 。 
ノレ で T へ 


の 許可 入力 が ^H” で か つ 自 分 が 割り 込み 
要求 を 出し て いる と きのみ 許可 出力 を L? 
と し , 右 に ある 許可 入力 を すべ て “L” と 
し て 割り 込み を 禁止 し て それ 以外 の と き は , 
左 か ら 右 へ 信号 を 筒 抜け に する と いう こと 
で す 。 

X 1 シス テム で は , IEI か ら IEO へ の 
信号 遅延 が 比較 的 大 きい の で , より イン タ 
ラプ ト の イネ ー プ ブル 線 を 確実 に する た め に ., 
図 2 の よう な ディ ジー・ チ ェ イ ン 構 造 を 取 
っ て いる の で , イン タラ プ ト ベ クト ル の 衝 
突 は 起こ ら な いよ うに な っ て いま す 。 ま た 
スロ ッ ト 1 が 1 番 左 に ある の で , 優先 度 は 
スロ ッ ト 1〉> スロ ッ ト 2>〉> スロ ッ ト 3>〉 ス 
ロッ ト 4 となり ます 。 


@ シ リア ル 伝 送 の 考え 方 

来 月 号 く わし 紹介 し ます が , シリ アル 伝 
送 に も いろ いろ な 方 式 が あり ます 。 マイ コン 
の 世界 で は , 非同期 通信 方 式 の アデ ロ ト ュ ユル 
(通信 の 論理 的 仕様 の こと ) を 持ち , か つ R 
S-232C と いう 本 来 は モデ ム と の イン ター 


. フェ ー ス の 標準 を 持っ て いる も の が ほとん 


の 
に 


和広 

非同期 通信 方 式 の 1 バイ ト の 伝送 の 形式 
を 図 3 示し ます 。 デ ー タ が ライ ン に 乗っ 
て いな いと き に は , ライ ン の 状態 は "H* と 
な っ て いま す (これ を マー ク 状 態 と いい ます )。 
実際 に は , RS-232C で は , 送信 側 で 一 12 
Vーー 5 V を 満た す 必 要 が あり ます 。 受 信 
する 側 は , 一 3 V 以 下 は マー ク 状 態 と 見 な 
し ます の で , 填 2V の ノイ ズ マ ー ジ ン が ある 
こと に な り ま す が ,「\H′ ニ マ ー ク ニー12 


V」 に と 記 境 し て いれ ば 十分 で す 。1 Byte の 


デー タ は スタ ー ト ピッ ト (通常 は 1 ビット タ 
イム ) が 最初 に 付加 され , その 後 8 ビ ッ ト の 
デー タ が LSB か ら 送 られ ます 。*0/ の と 
き が , スペ ー ス 状態 で あり , 伝送 線 で は , 
十 5 Vー 十 12V と な っ て いま す 。 る その後, 
必要 に 応じ て (実際 に は , 大 型 機 ほ の 交 通 以 
外 は , ほとん ど 行 われ な い ) パ リティ イ ・ ビ ッ 
ト が 付加 され , 最後 に スト ッ プ ビッ ト が 続 
きよ ます 。 ス トッ プ ビ ッ ト の 後に 次 の デー タ 
が 用 意 さ きれ て いな い 場 合 に は , 伝送 線 は マ 
ー ク の 状態 と な り ま す 。 

先 に も 述べ まし た よう に , RS-232C で は 


加 
ジュ WW 


Ed 


ヘー 


へ 


L 


X1 に お ける イン タラ ブ ト の ディ ジー・ チ ェ イ ン 


拡張 |/O0 スロ ッ ト 圭一 一 
| 填 5V 


ーー テー 
メイ ン 基 板 


1 
アク ノリ ッ ジ の デ | | 
ィ ジ ー チ ェ イ ン が 
並列 に 供給 され 、 イ 
ネー ブル の ディ ジ 
ー チ ェ イ ン を 別個 
に 設け る こと で ヽ Z- 
80 の モー ド 2 割り 
込み を 可能 と し て 
いる こと に 注意 ! 
(イネ ー ブ ル の ディ 
ジー チェ イン を つ 
けた の は ベク トル 
の 衝突 を 防ぐ た め ) 


Z-80 INT 


TTL の HH レベ ル が ーー5Vー 一 12V, し レベ 
ル が 十 5 Vー 填 12V で すか ら , 何ら か の レ 
ベル コンバータ が 必要 と な り ま す 。 こ の レ 
ベル コン バー タ は , トラ ンジ スタ で 容易 に 
作る こと が で きま す が ( 図 4 参照 ) , 専用 の 
ドラ イ バ 用 IC が 売ら れ て いま す の で , そ 
れ を 使う と 便利 で す 。 1 個 の IC に 4 
入っ て いま す の で 一 般 の 使用 で は , ゲー ト が 
余っ て し まい ます 。 し か し 1 個 300 円 程度 
で す の で ' 専用 IC を 使っ た ほう が 製作 は 楽 


非 同期 通信 方 式 の フォ ー マ ッ ト 


マー ク (1!) 
ターt 
4 5 回 回 回 ee | 時間 
スベ ペース (0) s ティ 


12 2 ビ ピット 
り ャ ー ク 
スト ッ プ 
ビ ピット 


sー ニ 5 一 8 
で す [SN75188(MC1488), SN 75189A 
(MC 1489A) な ど ]。 また コネ クタ の 形状 
も 規格 が 決め られ て お り ま す ( 図 5)。 2 番 
ピン が 送信 デー タ , 3 番 ピ ン が 受信 デー タ , 
7 番 ピ ン が ダラ ウン ド で ある こと くら い は 
空 で 憶え る よう に し で て 《 当 きぬ 。 


蛇足 で す が , ピン の 順番 な ど マ ニュ アル 


を 見 れ ば よい で は な いか と いう 人 が いま す 
が , 筆者 は , これ は 間違い だ と 思 いま す 。 ピ 
ン の 順番 ・ 名 称 が マニ ュ ア ル を 見 な く て も 


* ネ モー ド 2 割り 込み と は : 


Z-80 の 割り 込み の モー ド に は 3 種類 あっ て , 8080 モ ー ド で ある モー ド 0 と モー ド | は 割り 込み 処理 開始 ルー チ 
ン は 固定 番地 で す が , モー ド 2 で は , この 開始 ルー チン の 番地 を 割り 込み ベク トル の 指す 番地 の 内 容 で 指定 し 

ます 。 上 位 ア ドレ ス は CPU 内 の | レジ スタ で 指定 され , 下位 8 ビッ ト が 割り 込み ベク トル と 呼ば れ 、 周辺 LSI 
か ら 割 り 込 み ア クノ レッ ジ サ イク ル に 出さ れ ま す 。 つ まり 下位 8 ピッ トー256 番 地 が ジャ ンプ テー ブル の 広 さ と 
な り ま す が , ひ と つの テー プル が 2 番地 を 占有 する の で , 結局 128 種 の テー ブル を 割り 込み で 利用 する こと が で き 


ます 。 


た っ ユ 


あー 
* 


の 


る 


ンジ 
この 人 


ip / 
也 フ バン 


ノ 2 和 イン ター フェ ー ス の 提 作 75? 


グ 


わか る と いう 段階 まで くる と , あ な た も きっ 
と ハー ドウ ェ ア 製 作 の 面白 き 8 が わか っ て い 
る で し ょ うか ら 代 表 的 な 石 に つい て は ぜひ 
と も 憶え る よう に し て くだ る さい 。 RS-232C 
イン ター フェ ー ス の ピン の 名 称 は , すべ て 
装置 側 (Data Terminal) か ら 見 た 名 称 で 
ある こと に 注意 し て くだ さい 。RS-232C は 
端末 (Data Terminal) と モデ ム (modem, 
Data Set と も 言う ) と あつ な で と き の 規 
格 で す が , よく 混乱 する の は , 送信 と 受信 
の 向き で す 。 マイ コン と マイ コン を RS-232 
C で 接続 する と いう 場合 に は , 両方 と ぁ 端 末 
と な り ま すか ら , 両方 の コネ クタ の 2 番 ピ ン 
ほ 3 番 ピ ン を クロ ス で 継ぐ 必要 が あり ます 。 


馬 玉 胃 RS-232C コネ クタ (DB-25P) 
| 


X1 コネ クタ を 正面 か ら 見 た 
図 


の 2.6m の 穴 


TXD RXD 


OoCoooooooooo 
1 二 り 1 |3 


14 
oooooooooooo 


@ 昌 -632 ビ イン ター フェ ー ス 
次 に , RS-232C イン ター フェ ー ス に お け 
る 制御 信号 に つい て 説明 し ます 。 DSR (D 
ata Set Ready), DTR (Data Termi 
nal Ready) RTS (Request to Send)、 
CTS (Clear to Send) と いう モデ ム ・ コ 
ント ロー ル 信 号 で す 。i8251A を シリ アル 伝 
送 用 LSI と し て 用 いる 場合 に は , CTS 以 
外 の 信号 線 は , 考え る 必要 は あり ませ ん 。 
CTS は 入力 信号 で あり, CTS =\L* の と 
きのみ 送信 が 可能 と な り ま す の で , 通常 は , 
CTS=\L′ に 固定 する か ,RTS と 結び , 
送信 の と きのみ RTS =`L” と し ます 。R 
TS 信号 は , 送信 デー タ の 準備 が で きた と 
いう こと を モデ ム あ る い は 他 の マイ コン に 知 
ら せ る 信号 で あり , CTS は 。 モ デム ある い 
は 他 の マイ コン が デー タ を 受け 取る 準備 が 
で きた こと を 知ら せる 信号 で す 。 この こと を 
プリ ンタ の 標準 イン ター フェ ー ス と な っ て 
いる セン トロ ニク ス 規 格 と 照ら し 合わ せ て 
みる と RTSSTROBE CTS=BUSY 
で ある こと が わか り ま す 。 し か し モン トロ ニ 
クス 規格 は STROBE (1 番 ピン ), ACK- 
NOLEDGE (10 番 ピン ), BUSY (11 番 ピ 


9 テッ 
ざ 
の Y * 


) 


W 


販 諾 上 き 用 ドラ イプ IC を 使わ な い ド ライ C 回 路 | 
十 12V 
i825| 3KQ 


TXD 


2SA733 


ー1I2V ーI2V 


5V 


18251 
RXD 
2SC945 


た 


3KQ 電流 制限 抵抗 
1509 


2SC945 


3KQ 


DB-25P の 3 番 ビ ピン 
オー プン コレ クタ 出力 


DB-25P の 3 番 ビ ン 


ISI588 み ダイ オー ドリ ミッ タ 


ーー ニニ ーー 


ン ) を 用 いた ハン ド シ ェ イク 転送 で な けれ ば 
な ら な い の に 対し , RS-232C で は ハン ド シ 
ェ イ ク 転 送 は 規格 に は な っ て いな い の で す 。 
これ ら の ハン ド シ ェ イク 信号 を 用 いな (て 
る 通信 が 行 な を る と いう 利 店 は あり ます が , 
これ が か えっ て トラ ブル を 生ん で いる と い 
う 感 じ が し ます 。 


@ あ と が き 


最後 に な り ま し た が , 今回 は 連載 第 1 回 
と いう こと も あり , 準備 不足 で 具体 的 な 回 路 
に つい て は 余り 示す こと が で きま せん で し た 。 
ハー ドウ ェ ア の 製作 に あたっ て の 心掛け と 
か 基礎 知識 びあ る 割り 込み , DMA, RS- 
232C イン ター フェ ー ス な ど に つい て は ある 
程度 把 え を る こと が で きた と 思い ます 。 来 月 か 
ら は , いよいよ,「X 1 用 シリ アル ・ パ ラン レ 
ルイ ンタ ー フ ェ ー ス 」 を 製作 し ます 。 


加 双 冒 拡張 |!/O ポ ー ト 


(製作 予定 の プロ ッ ク 図 , TV カメ ラ 入力 を DMAC 
より する か PIO か ら す る か は 未定 で ある ) 


RS-2326 イ ンタ ー フ ェ ー ス 
レー Tp 


他 の マイ コン or モデ ム 
RD 


ボー レー ト 作 成 用 カウ ンタ 


b.4 1 (HuBASIC) 


CHPCK SUIM SYSTEM 


お 待た な せ し ま し た 。 X 1 用 の CHECK 
SUM プロ グラ ム で す 。 入 力 は , HuBASIC 


ドレ ス を 聞い て きま す の で , CHECK 
SUM を と り た い ブ ログ ラム の 先頭 


編集 部 
キー で す 。 スト ッ プ する と き は SH 
IFTBREAK を 押し て くだ さい 。 


を 起動 し て の MON コ ユマ ンド, すなわち モ アド レス を 4 桁 の 16 進 数 で 入力 し ます 。 8) プリ ンタ 出力 は アド レス 入力 時 に ? 
ニタ の M ユ マン ド で お 願い し ます 。 詳しく 4④ 次 に エン ドア ドレ ス を 聞い て くる の を 入力 し て か ら ア ドレ ス を 入力 し て 
は 本 誌 6 月 号 を みて ね 。 で , スタ ー ト アド レス と 同様 , 4 桁 7 きき AS 
使い 方 の 16 進 数 で 入力 し ます 。 9) また , ! を 入力 する と この プロ グラ 
1) プロ グラ ム の スタ ー ト アド レス は , 5) な お , スタ ー ト アド レス 入力 時 に ア ム か ら 抜 け て BASIC に 戻り ます 。 
リス ト 1 の ば あい F800, リス ト 2 の ドレ ス 入 力 を 省略 し た ば あい , 前 回 10) 出力 され る サム は , 8bytes, 64bytes 
ば あい B000 で す 。 表示 し た 最終 アド レス の 次 か ら 表 示 と , スタ ー ト アド レス か ら エ ンド ア 
2) ワー クエ リア は , リ スト 1 が FAE 5 し ます 。 ドレ ス ま で の 総和 値 ( 諾 下 の 数 値 が 
ーFB7F, リ スト 2 で B2E5 一 B37F 6) エン ドア ドレ ス 入 力 時 に アド レス を それ で す ) の 3 つ を 表示 し ます 。 
に な っ て いま す 。 省略 する と FFFF まで 表示 し ます 。 11) な お , 8bytes サム の 表示 欄 の , ( ピ 
3) プロ グラ ム を 起動 する と スタ ー ト ア 7) リス ト 出 力 中 の 一 時 停止 は スペ ー ス リオ ド ) は サム を みや す 〈《 す る た めで す 。 
**※ Dh!MZ Chec ト =um Bu』=tem V1.1 ※※ F91O F9 C さ EF F9 06 1E 3E 2D =4. さ さ 
ADR。 +O エ 1 + コ キミ +4 + ユ ロ +6 + プ sum。 F918 CD F9 F9 10 F9 2 EC Fa *.D ヨ 
FBOO 18 O4 OO OO OO FF ED 7B :2.8 ミ F92O0 CD C ヒ 7 F9 C さ EF F9 FSS CD =6。FA 
F ヨ oO O4 F ヨ CD 4 ミ Fa 21 OO QO : さ 。2 フ 7 F92 ヨ 77 FA F1 CD 7 Fa 11 人 Q さ : ロ 。 ロ プア 
FB1O 22 F2 FaQ CD 77 Fa 11 BoO :4.DD F9 さ O_ Fn CD 74 FA ED SE E3 FA 6.5a 
FB1 ヨ FaA CD 74 FQ さ E C9 ミ さ 2 FE =: コ .6 ビ F9 さ ヨ CD 70 FaA Da 64 F9 ED 5B : 呈 .B6 
FB2O F9 3E 5 さ CD 26 F9 Da 1C =:4.6 ビ <2CDB 
F ヨ 2 FB 2 0 さ 22 F2 Fa さ E 45 : さ -B4 F940 E さ FQ 21 QB OO 19 EB 1 =: さ .24 
FB さ O CD 26 F9 DQ 1 ビ FB 2O C ミ =: さ .FD F94B FE さ F 2O 06 さる E C さ さ 2 FE : さ 。94 
F さ ヨ 21 FF FF 22 F4 Fa 21 QQO :4.5O F950 F9 1 さ 1 21 E6 Fa FE 21 :4.46 
ーーー ニー ニニ ーー ニー ニーー ニ ーー ニーーー ニ ーー ニー ニュ ーー ニーーー 2 っ 060 F95B 2B 1E BE CB CD Ba F9 3B :4.54 
F ヨ 40 OO 22 EE Fa 22 FO Fa CD *:4.ES F960 03 F6 FF C9 F6 FF 37 C9 』 呈 .B6 
FB4B 77 FA CD EF F9 11 BO FA :』5.B1 F968 7C CD E5 F9 CD F9 F9 3E *6.24 
FB5Q CD 7C F9 CD EF F 11 AB : 呈 .B ミ | F970 2E CD F9 F9 7D C さ CC F9 =: 呈 .F2 
FBSB FA CD 7C F9 CD EF F9 さる E *:6.2F F978B SQ OS2 FB E9 D5 1 1 さ 3 FE *:4.OD 
FB6Q QB さ 2 EZ FQ 21 QO QQO 22 k2.5E |  。 ご で ーーー ジーー ウ ーー ロー ニー コー っ Recaco で コー 252Ei 
FB6B EC FA 2QA F2 FQ CD C7 F9 =6. 昌 9 | F9BO _OD 2B 05 CD F9 F9 1 F5 :4.06 
F ヨ 7QO CD E1 F9 Q6 Q ヨ 11 OO QQO sk2.C6 | F9 ヨ D1 C9 D5 CD 99 F 3 OZ =。OD 
FB7B ED 5 さ EA FA 7E CD CC F9 :6.34 F99O0 67 CD 99 F9 3 日 O1 6F D1 :4. さ F 
ーー ニーーー ニ ーーーーーーーーーーーーーーーーーーーーーーーーー cy4 F99 昌 C9 C5 1 1 さ CD BO F9 ミ 8 :4.69 
FBBO CD E1 F9 5E 16 OO E5 2 :4.2a F9AO OD 07 07 07 07 4F 1 1 さ :O.a5 
F ヨ BB _EA FA 19 22 EA FA 2 EC * 呈 .19 F9A ヨ CD BO F9 さ ヨ Q1 BE1 C1 C9 *k4.Ea 
FB9O FA 19 22 EC FA 2 FO FA : ロ .2F F9BO FE 47 ミ Q FE 41 さ O OA :2.FF 
| F ヨ 9 19 22 FO FA さ O 07 2Q EE : さ .74 | F9EB FE さ Q さ O 09 FE さ Q DB D6 :4.4D 
FBAO FA 2 さ 22 EE FAE1 E5 ED 5.DA  ”  。 | 。 パパ ーー ニーーーーーーーーーーーーーーーーーーーーーーーーーー 一 一 1E96 
FBA 5B F4 FA AF ED 2 E1 Ca : 呈 .E2 F9CO さ QO C9 D6 さ フ C9 さ フ C9 7C 4.4E 
| FBBO D5 FB <2 さ 22 F2 Fa 1O C4 :4.D2 F9CB CD CC F9 7D F E6 FO OF :55.E9 
FEB ヨ CD 06 F9 CD 64 Fa DA D5 : ロ .6 F9DO OF QF QF CD E5 F9 CD F9 =:4.9E 
ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 2B1Aa F9DB F9 F1 E6 OF CD E5 F9 18 5.Aa2 
FCO F ヨ FE 2O 2 F6 さ Q E7 Fa : 号 .4F F9EO 1 3E 20 1 14 E6 QF C6 :2.5D 
FBCB さ D さ 2 EZ7 FQA CS 6 FB CD : 号 .41 F9EB さ O FE さ Q DB_C6 07 C9 3E 4.14 
F ヨ DO 14 F9 C ミ 5F F 7 B7 2 :4.7E F9FO OD CD F9 F9 さ a E5 FaA 18 :4.FD 
FBDB OF さ D 2B 09 47 11 CF Fa :2.9E F9FB 0O5 F5 CD 7 FA F1 C9 O1 =:4.F6 
FBEO CD 7 F9 1Q FB CD Q6 F =.19 = 。 。 | パーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 一 っ 4D 
FBEB さ Q EZ FQ BZ 2B 0 さ CD 14 : さ .DE FAOO FQ C5 D5 E5 F5 O1 O1 1 4.Ba 
FBFO F9 2Q EE FA CD C フ 7 F9 2 * 曲 .CS FAQOB 16 OPC 2S1 QQO QO ED 7 E6 :2.BE 
FBFB FO FA CD C7 F9 CD EF F9 : フ 7.2C FA1O OB 2B 1 ビ 2E 7 BEB5 20 F5 :2.BD 
ーーーーーーーーーーーーーーーーーーーーーーーーーーーー 一 ー タ フ 91 FA1 ヨ 1 2Q EF CD 7D Fa 11 D ミ = :4.4 ビ 
F9OO CD 5D FA ヒミコ 1 さ FB 3E 3 :4.69 FASO FQ CD 74 FA CD 7D Fa F1 :6.69 
F90 ヨ CD F9 F9 2 EA Fa 6 6.02 FA2B F1 E1 D1 C1 3 1 ミ QB 5. さ D 


(J 


OOO18 さ DA 


** Dh!IMZ Check =um Su=tem V1。1 *%% 

内 DR.。 +O 1 +2 + さ + 和 イオ + ロ コロ + す 6 ユ プ um。 
BEOOO 18 O4 OO OO OO FF ED 7B :2.B さ 
BOQ Q4 BO CD 43 B2 21 QO_ QO 2。9 ア 
EO10 22 F2 B2 CD 77 BE2 11 BO 4.4D 
EQO18 B2 CD 74 BEB2 3E C9 3 さ 2 FE :4.DC 
BO2O BE1 さ E 3 CD 26 B1 Da 1C =: さ .DC 
BO2 ヨ BO 2 0Q3 22 F2 B2 SE 4 : さ 。24 
BO さ O CD 26 B1 DA 1C BO 20 0Q さ =: さ .6D 
BOS ヨ 21 FF FF 22 F4 B2 21 QO s4.Q 


B13O _B2 CD 74 B2 ED SB E3 B2 i5。.B2 


5 さ 。 


パソ ピア つの だ め の 情 報 誌 が , 創刊 され ま 
レ た だ 。 新しい コン ピュ ユー タダ ・ ラ イフ 。 そ し て 
「 め め 」 を 追求 し て いき ます 。 


10 年 前 ,」 コン ピュ ユー ダ は さび し か つた だ 

ん だ 。 コ デコ ュー ケー ト し た カコ の 

9 月 18 日 創刊 号 発 売 さあ !! コン ピュ ユー タ と 仲 よ し に な ろ 
定価 480 円 つ / と も だ ち に が ろう / 


3 江 刊 号 内 容 ---ーーー 
@ パ ソン ピア 7 の 全体 像 
@ サ ウン ド 特 集 
4% の ヨコ 5Z6 ミュ ミュージ シック を ーー 一 
ー 一 簡易 オル ガン に 変身 
@ 初級 グラ フィ ッ ク 講 座 
@ マシ ン 話 入門 
@ ゲー ム 作 成 術 
@ ROM/RAM ッ パッ ク に 一 工夫 
@ 旬 強 に だ っ て 使え る ぞ を 
@ MS-DOS V2.0 の 概説 
@ パン ピア ミニ 体験 レポ ー ト 


劇 | (株 ) 日 本 ソフ トバ ンク 発行 


〒〒I02 東京 都 千代 田 区 四 番 町 2 一 | 谷 03 (26|) 4095 


アーーーーーーーーーーーー ニ ーー ニー ニー ニー ニー ニー ニー ニー ニー ニー ニー ニー ニー ニー ニー ニー ニー ニー ニー ニー 
0 


ーー ーー ーー ーー ーー マツ 


HP マビ 
フロ の テク ニッ ク を 手 に 入れ た 。 


や っ た ね / Oh/ CZ 創刊 。X 1 ユー ザー の 皆さん の 熱 一 い ご 要望 に お 答え 
し て , よう や く 日 の 目 を 見 た Oh / CZ 創刊 号 で す 。 少々 ,、 パロ ディ ッ ク な 体 栽 
で す が , 中 身 は いた っ て マジ メ 。 皆さん に お 役 に Mr \ か り を まとめ て み 
まし た 。 特に X 1 ユー ザー が 待ち 望ん だ 「 漢 字 ワ ー プ ロ 」。 まだ プリ ンタ 機能 な 
ど 未 完成 な も の で す が , 今年 中 に は 編集 機能 等 増し て 、 み ご と な ワー プ ブロ に 完 
成す る 子 定 で す 。 また, 人 気 No1 Elder Man 氏 の ゲーム プ ログ ラム 。 今 号 の 
「SPACE PATROL」 は いか が で し た か 。 氏 に は 来 月 号 よ り ゲ ダー ム プ ログ ラミ 
ング に つい て 連載 し て いた だ く 了 予定 で す 。 創刊 号 を 期 に , ハー ド 入 門 教 室 も 始 
まり まし た 。 ユ ー ザ ー の た め の 雑 誌 作り めざし て 礁 闘 中 で す 。 そこ で 皆さん に 
お 願い 。 マ シン が 新しい せい も ある ん で し ょ う が , まだ まだ X1 SH 
い の で すね 。 皆さん, 頑張 っ て どしどし 投稿 し て くだ さい ね 。 待 っ て 


た ミリ コ フェ し ビュ マグ 


借 先 日 X1 で プロ グラ ム を 組ん で いた と ころ ,「 ビ デオ を 見 て の か , マイ コン を 操作 し て いる の か 」 と 聞か れ て , 思わ ず ,「 ビ デオ を 見 て いま す 」 と 答え て し まい まし た 。(O ) 
久世 間 一 般 の 大 学 と 違い わた し の 所 で は 8 月 で 夏休み は 終り , いそ が し か っ た 夏 も アッ と いう 間 に 過 ぎ て いき まし た 。 9 月 1 日 AM1 時: 課題 を や り 始 め る , ーーー アー (S ) 
⑱@ い つの 間 に か 「Oh ! CZ」 ? ) の は こび と な られ た よう で , まず は お めで と う ござい ます ( 誰 に 言っ て る ん だ ろう )。 誰 だ 本 体 死 す と も TV は 生き る な ん て いう の は ( 


@⑯X1 は グラ フィ ッ ク が か な り 強 い 。PCG と 48K フ ル グ ラ フ ィ ッ ク RAM が つい て いる の が 魅力 で 買っ た 。 ま た スリ ム な キー ボー ド と ,、 ワイ ン レ ッ ド の カラ ー が 僕 好み で 最高 ! (N) 
人 汎用 ボソ コン と し て , 新た な 世界 を 示し た X1 で す が , 機能 を 生か し た 独特 の 活用 例 が あま りな い の が 残念 で す 。 何 か お も し ろ い 活用 例 が あり まし た ら , 基 非 お 知ら せ を 。 (ん) 


iM 人 WC 創刊 号 ノ 昭 和 58 年 10 月 | 日 発行 発行 人 孫 正義 編集 人 田 鎮 洋治 郎 プ 発行 株 式 会 社 日 本 ソフ トバ ンク 出版 閣 Oh/ MZ 編集 室 電話 03(261)4095 プ 〇 JAPAN SOFT BANK 禁 無断 転載 


た 5 た 
MZ-80B/2000/2200 用 
の ミュ ー ジ ッ ジ エディ タダ 
の ⑦ の エコ ノミ ー バ パッ ク PART-1 

各 10 名 


* ミ ュー ジッ クエ ディ タ 機 と ECS と 
能 説 明 2 で 1 スク を 販売 し て いま す 。 毎 
オル ガン を ひく 感覚 で 日 使う ディ スク ドラ イプ ブ は, 


MUSIC 文 の 作成 が で きま す 。 持 二 みれ , ヘッ ド 
誤っ て ひい て も 一 音 ず つの の 汚れ は デー タ の SAVE/ 


削除 , 一文 ずつ の 削除 が で LOAD エ ラー の 主要 因 と な 
きま す 。25KB 分 の 音 ヵ 
録 で き , 連続 出力 し ます 。 
また , カセ ッ ト に SAVE, 
LOAD が 行なえ ん , LOAD 時 に フレ ー ズ 単位 の 音楽 編集 が で きま す 。 
デモ デー タ , USER'S MANUAL 付き \2,800 

* エ コノ ミー パック PART-1 機 能 説明 
に 2 MRP 
住所 録 の ほう は 240 名 分 の 各 登 録 が で き , か つ , 10 の 区 分 を 設定 する 
の で PT 
タ を 集計 で きま す 。 価格 も 安く , 家庭 事務 処理 等 大いに 役 立つ で 
ほう 。 \4.800 


ーー レ 
0 リー ニ 


栓 産業 で は , 世界 初 の 
DRY&GLUE タ イプ の クリ 
ー ニ ング フロッピー ディ 


* 記 I ンド っ て いま す 。 そこで ,。 この 


ディ スク を 使っ て 。 メンテ 
ナン スタ イム を 節約 し よう 
と いう も の で す 。 50 回 以上 
は 使用 可 で す 。 


中 テ レシ ステ ムズ 
MZ-80K/C/1200 用 
Telly BASIC 


Telly BASIC BAS-11T は , 
SHARP SP-5030 の 機能 を すべ 
て 含み ,、 プロ グラ ム 編 集 や デバ 
ッ グ の た め の 命 令 等 を 追加 し 
キー ボー ド の 機能 を 向上 きせ た 
BASIC で す 。BASIC プ ログ ラム 
・ テ キス ト は , SP-5030 に 上 答 
互換 性 が あり ます の で , 機械 語 
を 使用 し て いな い プ ログ ラム は , 

巻 で 注目 の アド ベン チャ その まま 実行 で き ます 。 さ ら に , 
ー ゲ ー ム 。 この ワン ダー ハ 「 整数 型 に し て あり ます の で ,。 ハ 
ウス も それ で す 。 カセット イス ピー ド ゲ ダー ム に 最適 で す 。 
ベー ス な が ら 30 余 の 部 屋 デ 
ー タ が お さめ られ , 区 解 さ 
も 超 が つく と か 。 キ ミ も チ 
ャ レン ジ し て みよ う / 

\3,500 


I2a タ スク フォ オーツ 高知 


WONDER HOUSE 
②MZ-80K/C/1200/700 用 
⑦X 1 用 


局 Oh / MZ 特 製 
べ ぺん ぎん シー ル 
8 月 号 プ レ ゼ ント 当選 者 発表 


①⑰ 漠 字 ワ ー プ ロ (大 阪 府 ) 吉田 康 政 (長野 県 ) 櫻井 功 一 (北海 道 ) 花 蘭 一 正 の オメ ガト ロン (岡山 県 ) 金光 清文 (熊本 県 ) 魚 
住 日 出 也 (鹿児島 県 ) 川野 猛 舘 (北海 道 ) 藤川 修 ( 静 岡 県 ) 山口 重則 の ドー ン バ パト ロー ル (奈良 県 ) 水 本 全 彦 (長野 県 ) 垂 沢 栄 


- (神奈 川 県 ) 保阪 至 (埼玉 県 ) 町 田 映 司 (三重 県 ) 田村 巧 答 ミッ ショ ン (北海 道 ) 内 海 孝 (大 阪 府 ) 児玉 良典 (千葉 県 ) 名 


荷 進 (東京 都 ) 笹田 信夫 (大 分 県 ) 江里 口 玲 フラ イボ ー イ (愛知 県 ) 小松 直 浩 (広島 県 ) 世良 庄司 (埼玉 県 ) 津田 和範 (大 阪 
麻 ) 川端 厩 夫 ( 愛 媛 県 ) 脇 義仁 ず の アン ダー グラ ンド シテ ィ (広島 県 ) 時 盛 恒 内 (北海 道 ) 斉藤 秀 格 (富山 県 ) 池田 敏治 (岐阜 県 ) 
吉見 直己 (静岡 県 ) 高木 功 の CP-15 (神奈 川 県 ) 笹目 史郎 (和歌 山県 ) 岡崎 重 伸 (三重 県 ) 吉村 厚 哉 (滋賀 県 ) 福田 浩一 ( 新 
県 ) 吉田 正孝 (大 阪 府 ) 栗原 悟 (兵庫 県 ) 渡辺 正明 (三重 県 ) 川原 伸 久 (千葉 県 ) 大 賀 恭 治 (群馬 県 ) 石森 道哉 (神奈 川 県 ) 高 
木 武雄 (千葉 県 ) 寺井 賢一 郎 (山口 県 ) 堀江 則 行 (愛知 県 ) 今村 達也 (大 阪 府 ) 外堀 雅也 (東京 都 ) 中 島 聡 ( 愛 胡 県 ) 中 矢 一 豊 

(愛知 県 ) 沢田 高安 (京都 府 ) 大 槻 成 雄 (千島 県 ) 坂本 敬之 ⑦MD2-D (大 阪 府 ) 名 村 孝太 郎 (群馬 県 ) 細野 浩 吉 (東京 都 ) 大 石 朝 
彦 (大 阪 府 ) 今泉 孝之 (香川 県 ) 久住 恭平 (宮城 県 ) 広岡 芳雄 (大 阪 府 ) 中 野 和雄 (福岡 県 ) 後藤 誠一 (愛知 県 ) 小林 一 雄 (兵庫 
県 ) 北村 裕幸 シス テム ソフ トウ ェ ア コ ン バ ー タ ー (石川 県 ) 土山 勝 (埼玉 県 ) 飯田 秀 貴 (神奈 川 県 ) 市 川 商 孝 (埼玉 県 ) 舟 崎 
高 保 (千葉 県 ) 高橋 秀行 ⑨. シ ミュ レー ショ ンス ター トレ ッ ク (東京 都 ) 高橋 英 一 (福井 県 ) 五十嵐 圭一 (神奈 川 県 ) 森山 豊 ( 三 
重 県 ) 歌川 秀 人 (埼玉 県 ) 岡田 薫 

以上 の 方 々 が 当選 され まし た 。 お めで と う ご ざ いま す 。 さ っ そく プレ ゼン ト の 品 を 送ら せ て いた だ きま す 。 


ング ディ スケ ッ ト 
5 イン チ 版 5 名 


5 イン チ 版 (HC-5) \ 3.500 


テー プ 版 高速 整数 演算 BAS-11T \3.800 


50 名 


プレ ゼン ト の 応募 方 法 

と 込み の アン ケー ト は が 
き の 該 当 項 目 を すべ て ご 記入 
の うえ ぇ , 希望 の プレ ゼン ト 番 
号 を は が き 右 下 の ス ペー ス に 
ひと つ 記 入 (1 一 ア な ど )「 し 
て お 申し 込み くだ さい 。 締め 
切り は 10 月 15 日 の 到着 分 まで 
と し ます 。 当選 発表 は 12 月 号 
で 行ない ます 。 


愛読 者 プレ ゼン ト 7 の 7 


の 00O6GO 


驚異 的 な メモ リ 容 量 


関数 潰 算 機能 つき ポケ コン 


シャ ー プ か ら , 従来 の ポケ ッ ト コ ユ コンピュ 
ー タ に 関数 機能 を もち も たせ た だ 新しい タイ プ の 
ポケ ッ ト コ ンピュータ PC-1401 (RAM 容 量 
4.2K バ イト ) を 新 発 売 し まし た 。 科 学 技術 
計算 が 手軽 に びき る よう に な り , 理工 系 の 
学生 や 科学 者 に 便利 な ボケ コン で す 。 
な お , RAM 容 量 8.5K バイ ト を 標準 実装 
する 高級 ボケ コン も 同時 発売 し まし た 。 
PC-1401 の 特長 
1) CAL モ ー ド に 設定 すれ ば 通常 の 電卓 に 
な り ま す 。 2 変数 統計 機能 , 16 進 演算 機能 
を 合 む 59 の 関数 機能 を ちっ て いま す 。 
2) 使用 頻度 の 高い 命令 , 関数 命令 と 簡単 
な キー 操作 で 入力 する クイ ッ ク コ マン ド 入 
力 を 採用 し て いま す 。 
3) BASIC モ ー ド で も 演算 結果 に 対す る 関 
数 値 が 得 ら れる ダイ レク ト ア ン サ ー 機 能 を 
持っ て いま す 。 
4) ROM40K バ イト , RAM4.2K バ イト の 
大 容量 で , し か も メモ リ 保 護 機 能 が つい て 
いま す 。 
5) 16 桁 液晶 ドッ ト 表 示 を 採用 し て いま す 。 
6) 関数 電卓 キー を アル ファ ベッ ト 部 か ら 
分 離し て , 操作 性 に すぐれ て いま す 。 
7) アル ファ ベッ トキ ー の うち 18 個 は プロ 
グラ ム の 頭 出 し が で きる 定義 付 キ ー と する 
こと が で きま す 。 


シャ ー プ ポケ ッ ト コ ンピュータ 


左 PC-140| 右 PC-I50| 上 CE-I6I 


762 OohiMz 1983.10. 


8) 配列 、 文字 関数 な どの BASIC が 入っ て 
いる た め , 入門 者 か ら 実 務 用 まで 使用 で き 
ます 。 
9) プロ グラ ムリ スト の 表示 を 禁止 する パ 
スワ ー ド 機能 が つい て いま す 。 

専用 ゲ プリ ンタ CE-126P は , 菩 の 静か な 24 
桁 す サー マル プリ ンタ を 採用 し . リモ ー ト ュ 
ント ロー ル 機 能 の つい た カセ モッ トイ ンタ ー 
フェ ー ス 内 蔵 で す 。 価格 は 17 ,800 円 。PC- 


oO06 ぃ oO の 
人 A 全 全 全 


O 届い 
全 、 


1245、 PC-1251, PC-1252、 PC- 1253 な ど 
の 各 機 種 に も 接続 可能 で す 。 

RAM 人 容量 8.5K バ イト が 標準 装備 され て い 
る PC-1501 は , 別売 の アロ グラ ム モ ジュ ー 
ル ん CE-161 (16K バ イト RAM) を 装備 すれ ば , 
RAM 容 量 は 24.5K バ イト と , ポケ コン で は 
泡 異 的 な 大 容量 RAM を 実現 し ます 。CE-15 
01 の 価格 は 50,000 円 で びす 。 も ちろ ん PC-15 
00 で も 利用 可能 で す 。 


低 価格 , 高 性 能 の ディ スプ レイ 


SHARP で は VI (ビジ ュ ア ルイ ン テ グ レン 
ーション : 映像 統合 ) 構想 の 一 環 ほ し て , 
各種 パー ソナ ルコ ンピュータ 用 の 14 型 カラ 
ー デ ィ ス プレ イ 2 機種 。 12 型 カラ ー デ ィ ス 
プレ イ 1 機種 を 発売 する 。 い ずれ も 汎用 性 
田 仕 欄 


と コス トバ パフ ォ ー マ ンス に すぐれ た 製品 で , 
4000 文 字 対応 で 11 万 8000 円 (14M-132C ), 
2000 文 字 対応 で 9 万 9800 円 (12M-312C ) 
と , いずれ も 他 に 類 を みな い 低 価格 を 実現 
し て いる 。 


14M 一 |32C 

プ ブラウン管 14 型 高 解像度 解像度 (HXV) 640 ド ッ ト ※400 ラ イン 

ドッ トピ ッ チ 0.39mm 映像 | アン プ 形 式 デ ジタル 

ネッ ク 径 29.Imm 回 路 | 周波 数 帯域 25MHz 

入力 信号 方 式 セパ バレ ー ト 方 式 表示 文字 4050 文 字 ( 実 使用 ) 

デー タ 信 号 TTL レ ベル ( 正 ) 外部 コン トロ ー ル 前 面 ・ 電 源 SW, 後面 ・ 水 平 同期 

水平 同期 信号 TTL レ ベル (人 負 ) 垂直 同期 ・ 垂 直 サ イズ ・ 輝 度 ・ マ ル チ SW 
垂直 同期 信号 TTL レ ベル ( 負 ) 電源 ACI00V 50 プ 60Hz 

入力 コネ クタ 角 型 8 ビン コネ クタ || 消費 電力 75W 

表示 範囲 IHXV) 240mmX150mm 環境 温 0'C 一 40'C (32"F 一 I04*F) 
表示 時 間 (HXV) 3I.0zsXI6.Ims 環境 湿度 30%ー90%%( 非 結 霊 ) 

水平 周波 数 24 .8kHz 重量 14.0kg 

垂直 周波 数 55.4Hz 外形 寸法 364( W) X425(D) X370(H)mn ーー 
$ コン ピュ ー タ 接続 ケー ブル , 高 さ 調整 用 ネジ 脚 お よび スモ ー ク ド フ ィ ル ター は 別売 で す 。 
14M 一 |42C 

プラ ウン 管 14 型 高 解像度 解像度 (HXV) 640 ド ッ ト ※200 ラ イン 

ドッ トピ ッ チ 0.39m 映像 | アン プ 形 式 デジ タル 

ネッ ク 径 29.Imm 回 路 | 周波 数 帯域 18MHz 

入力 信号 方 式 セパレート 方 式 表示 文字 2,000 文 字 (5X7 ド ッ ト 80 文 字 X25 行 ) 
デー タ 信 号 TTL レ ベル ( 正 ) 外部 コン トロ ー ル 前 面 ・ 電 源 SW、 ド ア 内 : 水平 同期 垂直 同 期 
水平 同期 信号 TTL レ ベル (人 負 ) H セ ンタ ー・ 垂 直 サ イズ ・ 輝 度 ・ マ ル チ SW 
垂直 同期 信号 TTL レ ベル ( 負 ) 電源 ACI00V 50/60Hz 

入力 コネ クタ 角 型 8 ビン コネ クタ || 消費 電力 58W 

表示 範囲 (HXV) 250mmX170mm 環境 温度 0 'C 一 40"C(32*F 一 104*F) 
表示 時 間 (HXV) 44.7zsX12.5ms 環境 湿度 30%ー902 ( 非 結 直 ) 

水平 周波 数 16.0kHz 重量 13.5kg 

垂直 周波 数 62.4Hz 外形 寸法 376(W) X401(D) X335(H)mm 


@ コ ンピュータ 接続 ケー ブル , 高 さ 調整 用 ネジ 脚 お よび 製品 写真 に 装着 され て いる 


スモ ー ク ド フ ィ ル ター は 別 で す 。 


MPP 


人 A、 人 、、 全 


1I2M 一 312C 

プラ ウン 管 12 型 高 解像度 | 解像度 (HXV) 640 ド ッ ト X200 ラ イン 

ドッ トピ ビッチ 0.38m 映像 | アン プ 形 式 デジ タル 

ネッ ク 径 29.Im 回 路 | 周波 数 帯域 18MHz 

入力 信号 方 式 セパ レー ト 方 式 表示 文字 2.000 文 字 (5X7 ド ッ ト 80 文 字 X25 行 ) 
デー タ 信 号 TTL レ ベル ( 正 ) 外部 コン トロ ー ル 前 面 ・ 電 源 SW, ドア 内 : 水平 同期 ・ 垂 直 同 期 
水平 同期 信号 TTL レ ベル ( 負 ) H セ ンタ ー・ 垂 直 サ イズ ・ 輝 度 ・ マ ル チ SW 
垂直 同期 信号 TTL レ ベル (人 負 ) 電源 ACIOOV 50/60Hz 

入力 コネ クタ 角 型 8 ビ ピン コネ クタ || 消費 電力 -58W 

表示 範囲 (HXV) 220mmX135m 環境 温度 0'C 一 40*C(32"Fー104"F) 
表示 時 間 (HXV) 44.7zsX12.5ms 環境 湿度 30%ー90%( 非 結 赴 ) 

水平 周波 数 6kHz 重量 I2kg 

垂直 周波 数 62 .4Hz | 外形 寸法 324(W) X376(D) X3I0(H)m 


@ コ ンピュータ 接続 ケー ブル , 高 さ 調整 用 ネジ 脚 お よび スモ ー ク ド フ ィ ル ター は 別売 で す 。 


較 価 格 ニン グ デ ィ ス ケッ ト HCD- 5 」( ミ ニク ロッ 

| 品名 | パソ コン 用 カラ ー デ ィ ス プレ ィ イ ピー 用 ) が 5 名 の 方 に プレ ゼン ト さ れ ま す 。 
形 。 名 |i4M 一 I42C|i4M 一 32C| 2M 一 312C 詳細 は 本 誌 「 愛 読者 プレ ゼン ト 」 の ペー ジ 
標準 価格 | 99,800 円 | Il8.000 円 | 89.800 円 | を ご 参照 くだ さい 。 


検定 試験 4 級 


5.270 名 が 応募 
日 本 マイ コン クラ 主催 の 第 1 回 マイ ク 
ロコ ンピュータ 利用 者 認定 試験 (7 月 24 日 
実施 ) に 全国 か ら 5,270 名 が 応募 し た 。 最 年 
少 は 8 歳 , 最 年 長 は 73 歳 , 女性 が 678 名 (13 
) で , 幅 の 広い 層 が パソ ュ ン に 関心 を 示 


mas、」 。 に CS の 。 
に 地区 別 受験 者 数 

人 RS 地 区 | 4 級 受験 者 (名 ) ここ 
これ は 便利 ディ スク クリ ー ナ ー 札 幌 43 ( 0.8) 34 ( 0.9) 
仙 台 247 ( 4.7) 153 ( 3.9) 
檜 産業 株 式 会 社 か ら , 世界 初 と 言わ れる , 東 京 2,595 (49.3) | 2.0I2 (51.8) 
pRy&GrUE タ イプ の 『 ク リー ニシ クティ | 生計 | ・ 計 9 | 計る 
スケ ッ ト 」(HCD- 5 , HCD- 8 ) が 発売 きれ 大 阪 92| (17.5) 757 (19.5) 
まし 広島 229 ( 4.3) 180 ( 4.6) 
og 松 山 * 70.( 1.39 49 ( 1.3) 
ディ スク ドラ イブ 装置 は , 磁性 粉 体 に ま 北九州 81 (1.5) 78.( 1.9) 
福 賠 277 ( 5.3) 83( 2.D 
みれ , これ が 原因 で 不安 定 な 動 作 を 起こ す 熊 本 56 1.1) 36 ( 0.9) 
こと が あり ます 。 デ ィ ス ク ド ラ イブ の 使用 を 人 
70 (1.3 5 ( 0.1 
頻度 に 応じ て , 適宜 クリ ー ニ ング すれ ば , 松 江 20 ( 0.4) 8 ( 0.2) 
ドラ イブ の 寿命 は 半永久 に な り ま す 。 合 計 5,270 ( 100) | 3,888 ( 100) 
「 ク リー ニン グ デ ィ ス ケッ ト 」 の 寿命 ーー ri] 村 5 
6 3 年 人 数 (比率 人 数 (比率 
50 回 以上 使用 で き , 経済 的 で す 。 価格 は ミ 了 1 LBT 20 こ 2 | 
ニニ フロッピー 用 HCD- 5 が 3,500 円 。 標 準 フ 15 一 19 916(17.4) 170(3.2) 


20 一 24 | 1.186(22.5) 
1.096(20.8) 
883(16.8) 


456( 8.7) 


ロッ ピー 用 HCD- 8 が 4,500 円 で す 。 
な お , 愛読 者 プレ ゼン ト と し て 「 ク リー 


74(1.4) 
60 以 上 | 47(0.9) | 


計 | 5.270(I00) 


旋 、 人 、 全 


日 本 ソフ トバ ンク か ら の お 知ら せ 

マイ クロ コン ピュ ー タ ショ ツウ '83 で は アン 
ケー ト に ご 協力 いた だ き あ り が と う ご ざ い 
まし た 。 ご 回 答 い た だ いた 方 か ら 抽 選 で , 
下記 の 方 々 に Oh/ MZT シャ ッ ツ を ご 送付 い 
迷 し 水 ま 6 
ぁ 市 原市 杉山 浩 (25)* 横浜 市 北原 猛 
8) テ 品川 区 原田 鬼武 (38)y 渋 谷 区 伊 
藤 博 毅 (22)y 千葉 市 佐々 木 久 美子 8) 了 y 
武蔵 野市 中 村 和 義 (24)*y 横浜 市 土生 哲 
也 (21) ル 上 福岡 市 五十嵐 和夫 (43)y 相模 
原市 内 山 浩志 (Q8)y 大 田原 市 山田 文博 
(30)*y 埼玉 県 補 田 英明 (17) 牙 小金 井 市 
嘉納 義浩 (15)y 江東 区 山崎 章 (以上 , M 
Z T シャツ 当選 者 , 敬称 略 ) 


X ] ユー ザー, ファ ン に 朗報 


か ね て か ら , わた し 達 MZ 編 集 部 に 「X 
1 に 関す る 本 は 出 ま せん か 」「0h/X1 を 出 
し て (だ さい 」 と いう 問い 合わ せな ど が 多 
(寄せ られ て いま し た だ た が, この た だ たび, 愛読 
者 の 皆さん の 熱心 な ご 要望 に お 答え し て , 
X 1 の 持つ 機能 を 徹底 的 に 解剖 し た 単行 本 
『X1 テ クニ カル マス ター』 を 発行 する こ 
と と な り ま し た 。 ソ フト 開発 に 実績 の ある 
スト ラッ ト フ ォ ー ド C.CC. の X 1 グル ー プ 
が 全力 を 投入 し て 執筆 し た 力作 で す 。 

初め て コン ピュ ー タ に ふれ る と いう 方 か 
ら , ある 程度 BASIC を 知っ て いる 方 まで を 
対象 に , 簡単 な マシ ン 語 まで , 実際 の 例 を 
挙げ な が ら 少 し ずつ 確実 に 理解 を 深め る よ 
うぅ 構成 され て いま す 。X 1 の 多彩 な 機能 を 
存 分 に 発揮 きせ る た め 開 発 さ れ た 「SHAR 
P X 1 HuBASIC」 を 平易 に 解説 し て いま 
すか ら , MZ-2000/2200 HuBASIC ユー 
ザー に も 参考 に な る と 思い ます 。 

ベン ギン 情報 コー ナー 7 の 


ーーーーー 一 STAR FLEET/B(X | ほか) 
シミ ュ レ ーション ゲー ム と いえ ば , テキ 
スト だ け , あと は 数 値 を た より に 進め る と 
いう も の が 多く 見 られ ます が , 推理 の お も 
し ろ る と リア ル タ イ ム ゲ ー ム の 追 力 が 楽し 
め る ゲー ム が あれ ば と いう 人 に ぴっ た り の 
ゲー ム が 登場 し まし た 。 

マイ コン ゲー ム と し て は 古典 的 傑作 で あ 
る 「STAR TREK」 を 基 に , グラ フィ ッ ク 
も 強化 た を し て リア ル タ イ ム の 動き を 実現 し 
た この ゲー ム は , 一 味 違っ た お も し ろ る が 
楽し め ま す 。 リ アル タイ ム と は いっ て も , 1 
回 の ゲー ム で 数 時 間 を 要する た め , 気 の 短 
い 人 に は あま り 向 いて いる と は いえ ませ ん 。 

この ゲー ム , 種々 の 機種 に 移植 きれ て い 
ます が , な か で も X 1 用 は PCG を フル に 利 
用 し て お り , メッ セー ジ も 変っ た キャ ラク 
タ で 表示 る され る な ど 活 っ た 画面 内 容 は 評価 
に 値する と 思い ます 。 

唯一 残念 な こと は , MZ-2000 用 に 比べ 若 
干 洋 いこ と 。 し か し これ は 。 カラ ー に な っ 
た だ ため で 。 し か た が な いこ と が も し れ ま せ 


STAR FLEETB 


7 の 6 タタ OhiMZ 1983.10. 


⑨ 価 格 @ 発 売 元 

シミ ュ レ ーション ゲー ム フ ァ ン の か た な 
ら ぜ ひと も 一 度 チ ャ レン ジ し て は ほし い 面 白 
る 抜群 の ゲー ム で す 。 
① ス ター フリ ー ト ノノ B 
シミ ュ レ ーション ゲー ム ③ マ シン 語 (モニ 
タ よ り ロ ー ド ) ④X 1 , MZ-80B/B 
2, MZ 2000 プ 2200 ⑤ テ ー プ ⑯4,500 
円 の ⑦ テ クノ ッ ソフ ト 


が 


② リ アル タイ ム ・ 


3 しさ スー ニュート 3 ュー テ 


人 @ 一 一 ーーーーーーーTANK TANK(MZ-700) 
テク ノ ソ フト の ゲー ム は , 比較 的 スト ー 
リー 性 を 重視 する も の が 多い の で す が , こ 
の TANK TANK は 単純 な 反射 神経 型 ゲ ー 
ム で , けっ こう 楽し め る も の で す 。 
格子 状 の 通路 を 通り な が ら 攻 め て くる 敵 
の 攻撃 を か わし , 発射 基地 を 破壊 する と い 
う も の で す 。 プ レイ ヤー の タン ク に は , キ 
ー リ ビ ピート が か か っ て いて , 任意 の 場所 に 
停止 する こと が で きま せん か ら , 適当 に 動 
き 回 りな が ら 攻 撃 し な けれ ば な り ま せん 。 
スピ ー ド は , 3 段階 で ゲー ム ス タ ー ト 時 
に 選択 し ます 。 一 番 お を そい モー ド で も か な 
り 難 か し いで す よ 。 編 集 室 び は M 君 の 21000 点 
が 最高 ……。MZ-700 の セミ グラ フィ ッ ク で 


TANK TANK 


も キャ ラク タ を 良く 使い こなし て お り 画 面 
や 効果 音 も 申し 分 な い 出来 で す 。 
①TANK TANK ② リ アル タイ ム ・ ツ ウォ 
ー ゲ ー ム ③ マ シン 語 ( モ ニタ か ら ロ ー ド ) 
④MZ-700 シ リー ズ ⑤ テ ー プ ⑯3.300 円 
(〈⑦ テ クノ ソフ ト 


@⑱ 一 一 ーーーーーーーBATTLE ARMY(X1) 
軍人 将棋 と いっ て も 知ら な い 人 も 多い か 
も し れ ま せん が , ボー ド ゲ ー ム と し て は 古 
《 く から あっ た も の で す 。 こ の BATTLE 
ARMY は 軍人 将棋 と た い へ ん 良く 似 た ウォ 
ー ゲ ー ム で す 。 ボ ー ド ゲー ム で は ゲー ム を 
する 人 が 2 人 の ほか に , 戦 か っ た 駒の 勝負 
を 判断 する 人 が 必要 で し た の で , 3 人 集 ま 
ら な いと た と できない も の で し だ が 。 

こん な ゲー ム と る コン ピュ ー タ で で き な 
いも の か な と , 思 っ て いた 夢 が 実現 され た , 
そん な 感じ で す 。 

ゲー ム の ルー ル は 一 見 複雑 を う で す が , 
ゲー ム の 始め に だ たい へ ん て いね いな 説明 が 
あり ます し , も し 間違っ た キー を 押し て も 
訂正 が きく など, 細か いと ころ まで 配慮 き 
れ で いま す 。 


BATTLE ARMY 


ゲー ム 所 要 時 間 が 30 分 以上 も か か る 本 格 
的 な シミ ュ レ ーション ・ ウ ォ ー ゲ ー ム で , 
画面 も DEF CHR$ 廊 を 使っ た ユニ ー ク な 
キャ ラク タ が 使わ れ て お り , プロ グラ ム を 
の も の も 楽し め ま す 。 
①BATTLE ARMY ② 思 考 ゲ ー ム ③ 
BASIC ④X1 (C-RAM 要 ) ⑤ テ ー プ 
⑥2,800 円 の マイ クロ デー タ ベー タ 
グ ジジ ーー イ 必 


@ 宇 ビル アド ベン チャ ー (MZ-80K/C/1200/700) 

ミス テリ ー ハ ウス で は , 気味 の 悪い 屋敷 
で し た が , この 室 ビ ル ア ド ベン チャ ー は , 
鉄筋 ビル を 想定 し て いま す 。 

ゲー ム は 2 部 構成 し な っ て いて , PART 
1 を クリ ア し た 人 だ けが PART 2 に 進め ま 
あぁ 

PART 1 は , エレ ベー タ に 乗る まで , そ 
し て PART 2 は , ビル 内 に か くし て ある シ 
ー ク レッ ト テ ー プ を 探し 出し . あの マイ ク 
ロキ ャ ビン と いう 会 社 に 届け ます 。 

命令 は すべ て , ミス テリ ー ハ ウス 調 。「 ド 
ウス ル ?」 「 ナ ニテ ?」 こ の 問い に 対し 答 
えて いき ます 。 こ の ソフ ト を 開発 し た マイ 
クロ キャ ビン も 前 作 の ミス テリ ー ハ ウス に 
味 を も しめて この 「 宝 ビル アド ベン チャ ー」 
も か な り 意 志 悪 な ワナ が 用 意 き れ て いま す 
の で ご 用 心 。 

さして , 難 か が し い ア ド ベ ベンチャー ゲー ム 
で は あり ませ ん か ら , 良 〈 考 えて チャ レン 
ジ し で み で くだ さい 。 
セミ グラ フィ ッ グ を 良 〈 使い こん で いて 。 
結構 楽し め る アド ベン チャ ー ゲ ー ム で す 。 
① 室 ビル アド ベン チャ ー1, II ② ア ド ベ 
ンチ ャ ー ⑨⑧③MONITOR か ら 6LOAD ④ 
MZ-80K/C/1200/700⑤ テ ー プ '  ⑥ 各 2,800 
円 の マイ クロ キャ ビン 


@ 一 一 パラノイア 200X(MZ-80B, 2000/2200) 
プロ グラ ム が 起動 する と, 大 変 反 っ た グ 
ラフ ィ ッ ク デ モ が 楽し め ま す 。 これだけ デ 


モ が 入念 に 作ら れ て いる と , この 先 ゲ ー ム 
その も の も 期待 し て し まい ます 。 

シミ ュ レ ーション の 一 種 で す が , メー カ 
ー は NEW TYPE ク ロス オー バー ゲー ム と 
呼ん で いま す 。 ゲ ー ム の スト ー リ ー は , 宇 
宙 船 「 シ リウ ス 号 」 の 船長 で ある あな た は , 
48 人 の クル ー を 率い て 宇宙 区 域 X メ = ニ 2, Y 
ー5, ZZ 三 29 の 調査 に 旅立ち ます 。 
ゲー ム は 武器 な どの つみ 込み に 始ま り , 調査 
を 終了 する まで で あり , 最終 目的 が 敵 を 倒 
すこ と で は な (, あく まで も 任務 を 達成 す 
る こと に あり ます 。 た だ し , 途中 で 任務 を 
は ば む 敵 に 対し て は 武器 な ど を 用 い 応 戦 し 
な けれ ば いけ ませ ん 。 宇宙 船 に は メイ ンコ 
ンピュータ が 搭載 され て お り , 
タ の 指示 を 参考 に し な が ら , 果して あな た 
は 任務 を 達成 びき る で し ょ うか 。 

テク ノ ソ フト の 「 ス ター フリ ー ト ン B」 
の リア ル タ イ ムシ ミュ レー ショ ン を 思わ せ 
る ゲー ム で , や は りこ れ も 2 一 4 時 間 要 し 
ます 。 難易 度 は 中 くら い 。 秋 の 夜長 に 一 度 
チャ レン ジ し て み ま せ ん か 。 
① パ ラノ イア 200X ⑳ リ アル タイ ム ・ シ ミ 
ュ レ ーション ③MONITOR か ら LOAD 
④MZ-80B, MZ-2000 プ 2200 ⑤ テ ー プ ⑥ 


4,800 円 の クリ スタ ル ソ フ ト 
RS 


コン ピュ ー 


@ 一 高速 機動 部 隊 (MZ-80B, 2000/2200) 

クリ スタ ル ソ フ ト 製 本 格 的 シミ ュ レ ー シ 
ョ ン ゲ ー ム の 1 本 で す 。 こ の ゲー ム は 架空 
の 時 代 に お ける ある 戦い に を シミュ レー ト し 
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宝 ビ ル ア ド ベン チャ ー 


パラ ノイ ア 200X 


た も の で す 。 ゲ ー ム の タイ トル で ある 「 高 
速 機動 部 隊 」 は , 進化 し た 装甲 車両 で ある 
機動 戦車 に よっ て 構成 きれ て いま す 。 機動 
戦車 は 車両 で あり な が ら 前 進 す る た め の 車 
輸 や キャ タビ ラ を 持っ て いま せん 。 コン バ パ 
クト に まとめ られ た 原子 炉 と それ を 守る ぶ 
厚い 外装 は , 自由 に 動作 する 6 本 の 足 に よ 
っ て 支え られ て いま す 。 第 38 補 給 基 地 防 衛 
の た め 派 遣 さ れ た あな た は この 恐る べき 高 
速 機動 部 隊 か ら 基 地 を 果して 守り きれ る で 
| 具 lo う カ PLYYLO 内 

シミ ュ レ ーション ゲー ム は , 物語 が 命 だ 
と いい ます が , この 高速 機動 部 隊 に 関し て 
は 文句 な し 。 十分 楽し ゅ ます 。 難易 度 は 中 
の 上 くら い 。 シ ミュ レー ショ ン で すか ら あ 
ら か じ め 作 戦 を 立て て か ら 取 り 組 み ま し ょ う 。 
作戦 地図 コマ, ルー ルプ ブッ ク が 付属 し て 
いま す 。 
① 高 速 機動 部 隊 シミ ュ レ ーション ⑤③ 
MONITOR か ら LOAD ④MZ-80B, MZ 
-2000 プ 2200 ⑤ テ ー プ ⑥4,500 円 ⑦ ク 
リス タル ソフ ト 
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MZ-2000 を 使用 し て いま す 。 キー 入 
MEET 
うし だ ら よ いで し よう ガ 。 

栃木 県 清原 一 航 
MR 

き に キー 入力 確認 音 を 出す の で あれ 

ぱ ば , ブロ グラ ム 中 が, ダイ レク フト で 
POKES$0015, 0 

を 実行 し て て ぐだ さい 。 ご れ に よ つ て モニ タマ 

MZ- 1Z001M の ワー クエ リア (ラベ ル 名 は 

SWRK, マニ ユア ル の プロ グラ ムリ スト を 

参照 ) を 書き ガ え て , 以後 キー を 入力 する 

だ びに ベル が 只 る よう に な の ます 。 

ご の 変更 は , MZ- 2000 用 の モニ マタ で ある 
MZ- 1Z001M だ け で な ぐ ,MZ-80B で 使わ れ 
て いる SB- 1520 て も 正常 に 動作 し ます 。 

ベル を 鳴ら さ な く する と き は , 

POKE$0015, 255 


と し ます ざ 。 

な お , ベル の 音 の 長 さ を 変え る 場合 は や 
は り , POKE 命 令 な ど で , 0F18 (long), 
0F17 (short) 番地 を , まだ な 音 の 高 さ を 変 
える 場合 は , 0F1B (higD, 0F1A (low) 
を 好み に あわ せ て 変更 し て ぐだ さい 。 

私 は , MZ-731 を 家庭 用 テレ ビ に 接続 

し て 使 つ てい ます 。 質問 で す が , モ 

ニタ の コマ ンド 待ち の と き に , 画面 の 右上 

の 端 の ほう が , 白く な つて し まい ます 。 何 が 

原因 な の で し よう ガ 。 買 つ だ 当初 は , この 
よう な 現象 は 起こ り ま せん で し た 。 

北海 道 石岡 修一 

MZ- 700 に 限ら ず , 一 般 に ディ スプ レ 

の の 

に は , 画面 の 一 部 ガ 白 く な つ だ り の , 画面 に 

し まき 模様 が 出 を りす る こと は , 仕方 の な い 

こと な の で す 。 ご れ は 主として , RFCRadio 


Frequency) と いわ れる 信号 方 式 の 精度 が , 


あま り よ ぐ な いこ と に 帰 因 し ます 。 ご の 障 
害 を 完全 に 直す こと は 難し いで す が , テレ 
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ピ 側 の 周波 数 を 正確 に 合わ せる こと に よ つ 
て , ある 程度 , 良く する こと が で きる よう 
で す 。 一 屋 テ レビ 側 の 周波 数 を 調整 し な お 
し て ぐだ さい 。 そ れ で も な お ら な いよ う で 
し 己 、 ジ ヤー デ エ ンダ ジニ カリ ング に 問い 
合わ せ て ぐだ さい 。 
RS-232C と いう 方 式 で , コル ビュー 
久間 の デー タタ 通信 が で きる と いう こ ご 
と で す が , BASIC の ソー スプ ログ ラム な ど 
を 他 機 種 か ら 移 し て , MZ で 走ら せる こと 
は で きる の で し よう ガ 。 
福島 県 立川 昇 
コン ビュ ユー タ ご どう し の 通信 方 式 に は , 
人 Mae シリ アル ポ 
ー ト (シリ アル 二 直 列 ) を 用 いた だ RS-232 
C と 呼ば れる 規格 に 合わ せ だ 通信 方式 ガ よ 
ぐ 使 われ て いま す 。 ご の RS- 232C と ば れ 
る 規格 は , 米国 の EIA (Electrical Ind 
ustry Association の 略 ) と ベル 研究 所 な 
どの 間 で 決め られ だ 規格 を も と に し て 作ら 
れ だ も の で , モデ ム と 呼ば れる 通信 機器 こ 
の 標準 的 お 接続 万 式 と な つて いま す 。 
さて , コン ピュー タダ どう し を この 通信 亡 
式 を 用 いて 接続 する だ め に は , 生 件 と し て , 
相互 の コン ピュータ が , RS- 232C イ ンタ ダフ 
エイ ス を 持つ て いる 和 め 概 ガザ あ り ま す 。MZ 
シリ ー ズ で は , MZ-80B, 2000 ガ オブ ショ 
ン の MZ-8B103 を 用 いる こと に よ つ て RS- 
232C を サポ ボー ト に ト する こと が で きま す (MZ 
-80, 1200, 700 用 の RS-232C イ ンタ フエ イ 


ス は 発売 され て いま せん )。 

次 に . 相互 の コン ビュ ユー タマ に. RS-232C 
イン タフ ェ イ ス を コン トロ ー ル する ソフ ト 
ウェ ア が , な けれ ば な り ま せん 。 ご れ は . 
RS-232C イ ンタ フエ イス に 用 いら れる Z- 
80SIO や USTAT な どの LSI が, 一般 に ソフ 
トウ エア で 初期 設定 お よび デー 転送 モー 
ド を 設定 する だ めで す 。 

一 般 に , マイ クロ ソフ ト 系 の BASIC で は ., 
RS-232C を と お し て , デー を 送受 する コ 
マン ド を 持つ て いる だ め , 非常 に 便利 な の 
で す が . シャ ー プ BASIC で は , SB-6521. 
5521, MZ-2Z001. MZ-1Z010 が . RS-232 
C を サポ ー ト し て は いる も の ., A$ な どの 
スト リン グ ガ 変数 の 内 容 を 送受 信 す る だ け 
の , コマ ンド し ガ も つて いま せん 。 

し だ が つて , 現 段 階 で て, MZ と 他 の コン ピ 
コー タ を RS- 232C で 結び , プロ ブラ ムリ ス 
ト を 転送 させ る こと は . 残 意 な が ら ., 機械 
語 プ ロブ ラム を 自分 で 組ま な いこ と に は 不 
可能 で す 。 

し が し , 制約 は あり ます が , F- DOS を 持 
つて いる の で あれ ば ぱ ば , 数 段階 の 手順 に わけ 
て 操作 する こと に よっ つて , プログ ラム リス 
ト で も 転送 する こと が で きる よう で す 。 

私 は , MZ -80B 用 の F-DOS に 付属 し 

て いる BASIC コン バイ ラ を 使 つ て , 
SB-6520 の BASIC プ ログ ラム を 機械 語 に コ 
ン パ イル し て 使っ つて いま す 。 と ころ で , で 
きだ 機械 語 を , SB-6520 の ディ スケ ッ ト に 


転送 し て 走ら せる と , 暴走 し て し まい ます 。 
どう し て で し よう が か 。 
山梨 県 斎藤 俊吾 
MZ-80B や 2000 に は , SB-1520 (MZ- 
内 2000 は , MZ-1Z001M) と SB-1521 
(MZ-2Z004A) の 2 種類 の モニ マガ あり , 
それ ぞ れ の モニ は, 基本 的 に は , 同じ こ 
と を し て いる の で す が , 機械 語 ブ ロブ ラム 
を 走ら せる 場合 に は , まつ だ く 互 損 性 が あ 
り ま せん 。 前 者 の SB-1520 CMZ-1Z001M) 
は , テー ブ BASIC や ディ スク BASIC で 使 
われ て いる モニ タ で て あり, 後者 の SB- 15 
21 (MZ-2Z004A) は , 前 者 SB-1520 の 多 機 
能 上 犬 で , Pascal や F-DOS で 使わ れ ね て いま 
すず 。 
さて , BASIC コ ン パ イラ は ,F-DOS 上 に 
ある だ め , モ ニタ と し て SB-1521CMZ-2Z 
004 A) を 用 いて いま す 。 そし て , コン バイ 
ル さ れ て 生成 する オブ ジ エ フ クト も SB-1521 
(MZ-2Z004A) 上 で 動作 する も の で す 。 し た だ 


が つて , SB-6520 な どの ディ スク BASIC や , 


テー ブ BASIC 上 で 正常 に 動作 させ る こ と 
は で きま せん 。 
SB-1520 (MZ-1Z001M) 上 で 動作 する 
BASIC コ ン パ イラ が , シャ ヤー ブ ガ ら 発売 さ 
れれ ば , よい で すね 。 

今 , 学校 の 授業 で , フォ ー ト ラン を 

勉強 し て いま す 。 と ころ で , MzZ で 
も フォ ー ト ラン を 走ら せ だ い の で す が , ど 
うし た ら よ い の で し よう か が 。 

大 阪 府 北村 容 

現在 ,MZ シ リー ズ で , 簡単 に フォ 
Oie 
る に は . DISK シ ステ ム と CP/M と いう D 
OS ガ が 秘 要 で す 。 

MZ シ リー ズ の な が で , CP/M が 走る 機 
種 は , MZ-3500, 2000, 80B, そし て , ハ ー 
ドウ エア の 変更 を 入 要 と し ます が , OCP/M 
ソフ トカ ー ド を 用 いる こと に よ つ て , MZz- 
80 し で /1200 で も 走ら せる こと が で きま す 。 

CP/M が ガ 走 つて し まえ ば , あと は , その 
言語 を 求め る こと に よ つ て , MZ で も 走ら 
せる こと が で きま す 。 

詳し く は , 次 号 の 「Lets Disk Opera 
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tingl」 で , 高級 言語 の 扱い 方 を 掲載 する 予 
定 で す の で , 期待 し て くだ さい 。 

MZ-2000 を 持つ て いま す 。BASIC の 

プロ グラ ム を 入力 し て いる と き に , 
POKE 文 の 入力 ミス で , プロ グラム が 暴走 
し て し まい まし だ 。 リ セツ トス イツ チ を 押 
し て , 1300m 番 地 (BASIC の ホッ トス ター 
ト ) へ ジャ ンプ し だ も の の , ファ ンク ショ 
ン キ ー の 内 容 が , すべ て 消え て し まい まし 
だ 。 こ れ は , どう し て で し よう か 。 ま だ 消 
えな い 方 法 が あれ ば 教え て くだ さい 。 

愛知 県 岩山 弘司 

MZ-2000 に 限ら ず , MZ-80B で も , 
PP ES ダ ジ ジ 
ショ ン キ ー の 内 容 が すべ て クリ ア さ れ て 
し まい ます 。 ご れ は , モニ タ MZ-1Z001M 
や SB-1520 が , 周辺 デバ イス の 初期 設定 の 
と き に , ファ ン フ ション キー の ワー クエ リ 
ア を フク リア し て し まう か ら で す 。 

し た が つて , クリ ア さ せな いよ うに する 
に は , ファ ンク ショ ン キ ー の クリ アル ー チ 
ン を , ご わし て や れ ば よい こと に な り ま す 。 

ファ ンク ショ ン キ ー の グリア は , モニ タマ 
の 008Fm, ガ ら 書き 込ま れ て いる CALL や 
DINT (CALL0650H, モニ タブ ログ ラム リ 
スト を 参照 の こと ) を NOP (Z-80 の 命令 
で , ノー オ ベ レ ーション = 何 も し な い の 意 ) 
に 変え て や れ ば よい の で す 。 

モニ タモ ー ド ガ ら , M コ マン ド で , 
008F CD 一 >00 
0090 50 一 200 
0091 06 一 00 
と する ガ , BASIC ガ ら POKE 命 令 で , 
POKES$S008F, 0 : POKES0090, 0 : 


POKES0091, 0 を 実行 すれ ば OK で す 。 だ 
めし に 実行 し て くだ さい 。 
MZ-2000 を 持つ て いま す 。 先 日 , MZ 
Q | -2000 用 の Hu-BASIC を 買い まし だ た 。 
と ころ で , MZ-2000 用 の Hu-BASIC は , X1 
や 700 の プロ プラ ム を ロー ド す る こと が で き 
る と いう こと で , MZ-700 用 の Hu-BASIC 
で 動作 する プロ グラ ム を 買 つ だ の で す が , 
ロー ド で きま せん 。 ご どう し て で し よう か が 。 
兵庫 県 前 田 弘明 
MZ-700 と MZ-80B や 2000 の カセ ツ 
IA ト の ボー レー トド (転送 速度 ) が 異 つて 
いる だ めで す 。MON で モニ タモ ー ド に ジ 
ヤン ブ し て ., BL1 と する と , MZ-700 の テー 
プ ブ ガ 読 め る よう に な り ま す 。 
詳し く は , Hu-BASIC マニ アル 296 ベー 
ジ を みて ぐだ さい 。 


質問 に お 答え し ます 。 

日 頃 疑 問 に 思 つ て いる こと , どん な ご こ 
で も 結構 で す 。 ご どん どん お 便り くだ さい 。 
難問 奇 問 , 編集 部 が 総力 を あげ て お 答え 
い だ し ます 。 だ だ し , お 寄せ い だ だ いて い 
る も の の 中 に は , マニ ュ ア ル を 読め ば すぐ 
に 解答 ガ 得 られ る よう な も の も 多々 あり ま 
す 。 最低 限 . マニ ュ ア ル は 詩 読 し て お きま 
し よう 。 質問 は な る べく 輸 体 的 に , 機種 名 , 
シス テム 構成 , 秒 要 な ら 図 も 入れ て こと 細 
ガ に 書い て ぐだ さい 。 返 信用 切手 同封 の 質 
問 を よ ぐ 受け ます が ., 原則 と し て ., 質問 に 
は 本 計上 で お 答え する こと に な つて いま す 
の で ご 了承 くだ さい 。 な お , 質問 の 内 容 に 
つい て 直接 問い 合わ せる こと も あり ます の 
で , 電話 番号 も 明記 し て くだ さい ね 。 

宛先 : 〒102 東京 都 二 代田 区 四 番 困 2-1 

(株 ) 日 本 ソフ トバ ンク 
出版 部 「Oh! MZ 質 問 箱 係 


アメ リカ で 流行 る は AIDS, プレ イク ダン 
ス , そし て MTV 一 24 時 間 ミ ュー ジッ クノ / と 
いう 音楽 専門 の ケー ブル TV 局 (CATV) だ 。 
CATV 局 の 中 に は UNIX を 使っ た コン ピュ ー 
タ シ ス テム を 採用 し て いる と ころ も ある そ 
う で , アメ リカ で の 普及 ぶり に 刺激 され て 
か , 日 本 で も 企業 化 の 動き が ある 。 お も し 
ろ い の は , 私 鉄 の 各社 が 乗り気 と いう こと 。 
ふと 思い 出し た の が 眉村 卓 の SF「 幻影 の 


構成 」 だ 。1963 年 の 作品 で 、 コ ンピュータ 
を 人工 頭 脳 ” と 書い て ある の が ご 愛敬 ? 
ウォ ー ク マン に 外見 の よく 似 た , イミ ジ 
ェ ッ クス , と いう メデ ィ ア ツー ル , イヤ ホー 
ン か ら は コン ピュ ー タ が 各自 の 好み に 合わ 
せ て 選ん だ 情報 が 流れ て くる 。 人 々 は 1 日 
中 それ を 聞い て 指示 に 従う だ け だ 。 
物語 は イミ ジェ ックス の 支配 に 気づい た 
主人 公 と 仲間 達 の 抵抗 一 一 と いう お きま り 
の パタ ー ン を た だ たどり, さい ご は ハッ ピー エ 
ンド な ん だ けれ ど , 視聴 率 60% の “お し ん 
ドロ ー ム "が 席巻 する 日 本 に 不安 を 感じ た 
方 は , 読ん で みる こと を お すす めす る 。 コ 
ンピュータ に の め り 込 むこ と も 含め て タイ 
トル の ~ 幻 影 の 構成 が イミ シン だ 。( 誠 子 ) 


bi % ン ル アー 
さ 4 
M も 隊 
SN Je 
ん ここ 6 BOX 
デー ・・ ・ ・ 臣 導 バ パ 


ちょ っ と 時 期 は 早い が , 今 は クリ スマ ス ・ イ ブ と し よう 。 

べ ぺん ぎん 村 に 住む , 酒屋 , 鳥屋 , 花屋 , 洋品 屋 , 洋菓子 屋 の 
5 人 は , 毎年 クリ スマ ス ・ イ プ に 集まっ て パー ティ を 開い て い 
る 。 そし て , それ ぞ れ が プレ ゼン ト を 持ち よっ て 大 変換 大 会 を 
行なう の だ 。 


さて , 今年 の イプ に 贈ら れ た プレ ゼン ト は , シャ ン ペ ン , 七 
面 島 。 ク リス マス ツリ ー,。 セー ター,。 ケー キ だ っ た 。 も ちろ ん 
彼ら は , 自分 の 店 で 扱っ て いる 商品 を プレ ゼン ト す る よう な 不 
粋 な こと は し な か っ た し , 贈る 相手 の 家 で 扱っ て いる 商品 を プ 
レ ゼ ント する よう な 失礼 な こと も し な か っ た だ た 。 つ まり , 酒屋 は 
シャ ン ペ ン を 贈り も , 贈ら れ も し な か っ た わけ だ 。 

今回 は , 酒屋 が セー ター を 洋菓子 屋 へ 贈っ た 。 ケ ー キ を 受け 


応募 方 法 
O 官製 ハ ガキ に , 答 と 住所 ・ 氏 名 ・ 年 齢 を 明記 の うえ , 
〒I02 東京 都 千代 田 区 四 番 町 2 一 | 

日 本 ソフ トバ ンク Oh/MZ PUZZLE BOX 係 
まで お 送り くだ さい 。 
O 締 め 切 り 10 月 15 日 到着 分 O 正 解 発表 12 月 号 誌 上 
O 正 解 者 多数 の 場合 , 抽選 で 10 名 の 方 に Oh / MZ 特 製 記 念 品 
を 差し 上 げ ま す 。 


取っ た 人 物 は 酒屋 に クリ スマ ス ツ リ ー を 贈っ た 。 ま た , 洋品 屋 
が 贈っ た 品物 を 扱っ て いる 商店 主 は , 花屋 に プレ ゼン ト を 贈っ た 。 

で は , ここ で 問題 。 洋 品 屋 は , いっ た い 誰 か ら プ レ ゼ ント を 
も ら っ た だ ろう か 。 た だ し , 品物 名 は わか ら な く て も 構わ な い 。 


蘭 畔 8 月 号 フイ ズ の 正解 較 計 
答 15 個 

まず , 最初 に あっ た ココ ナッ ツ の 数 を N と し よう 。 す る と , 
大 吉 の 取り 分 は , 

A 王 飼 十 二 ……… ① て 表わさ れる 。 
次 に 中 吉 の 取り 分 は , 

B 王 本 (N 一 A) 十 二 ……② で 表わさ れる 。 
残る 小吉 の 取り 分 は , 

C=+ す (N 一 A 一 B) 十 本 ……③ と な る 。 

以上 , ①②③ の 連立 方 程 式 を 解く と , 

A ニ 8, B=ー4, C=3 と な る 。 
よっ て 合計 15 個 の 答 が 出る 。 


正解 者 
(福島 県 ) 大 島 明 夫 (石川 県 ) 竹村 達雄 (千葉 県 ) 近藤 誠一 ほ 
か 7 名 様 の 方 に 記念 品 を 送ら せ て いた だ きま す 。 
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ご めん な さい の ページ 


8 月 号 ひと り 麻 雀 ゲ ー ム 

P.63 20840 FORI2=2TO12 一 FORI2=2TO11 
21030 FORI3=2TO9 一 FORI3= ニ 2TO8 
21220 FORI4=2T06 一 >FORI4=2TO5 


Y8)THENGOTO23320 : GOSUB22900 


9 月 号 BASIC BACK UP COPY 作 法 
P.104 リス ト 1 
90 行 F7,21,FEーー 、 一 F7,21.60 


編集 室 か ら 

夏 は 暑い も の , と いい ます が , し か し 今年 は 湿気 が 多く 、 た い へ 
ん し の ぎ に て くい 夏 で し た 。 秋 の 特集 と し て , ゲー ム プ ログ ラム と 0 
h /X1 モ ドキ を お 届け し まし た が いか が で し ょ うか 。 


連載 中 の , 風間 浩 氏 の 「 シ ステ ム ソ フ トク の 活用 法 」, 松崎 洋 氏 の 


P.66 23250 GOSUB22490 : GOSUB23310 一 GOSUB22490 : GOTO23310 
23300 IF(F4=Y8)THENGOSUB23320 : GOSUB22900 一 IF(F4 三 


本 誌 の バグ に 関す る お 問い 合わ せ は 
受付 電話 03(265)5789 
受付 時 間 月 一 金曜 日 

16 : 00 一 18 :00 
な お , お 問い 合わ せ は , 原則 と し て 本 誌 

バグ 情報 の み に 限ら せ て いた だ いて お り ま 

す 。 ま た , ご 質問 いた だ く と き は , 〇 月 号 

〇 ペー ジ , タイ トル を 明示 し て くだ さい 。 
2 ヵ月 前 まで の バグ に 関し て は , この ペ 

ー ジ で サポ ー ト し て いま す 。 パ ッ ク ナ ン バ 

ー で お 確 め くだ さい 。 

@ @ @ @ @ @ @ @ @ @ @ 

「LET'S DISK OPERATING/ 」 は “夏休み " を と っ て 休載 で す 。 

Refresh し て の 次 号 か ら の 記事 を お 楽し み に 。 
また , 空 丹 遊 歩 さ ん の 9 月 号 の 宿題 , DIARY DATA BASE の 

デー タ を プロ ッ タ プリ ンタ に プリ ント アウ ト す る 方 法 の 解答 編 も 次 

号 で ご 紹介 する 予定 で す 。 


(シャ ー プ 株 式 会 社 発行 の MZ ソ フト ウエ ア 
イン フォ メー ショ ン No.I, 2 より 掲載 ) 


@ ド ッ ト プ リン MZ-80KP5 の 取扱 説明 書 で 「BASIC 
に よる プリ ンタ コン トロ ー ル 」 の 説明 の 補足 。 


ノン ライ ンス ペー スモ ー ド 。 お よび 80 キ ャ ラク タモ ー ド へ の 変 
換 を 同時 に 入力 する 場合 
PRINT ン ノン P "回" : "ロロ "CRI 
と いう 命令 文 を 実行 さき せる と , プリ ンタ 側 で は 
PRTNT グ P “回 EE | 回 IGR 
と し て 受け 取り , 1360 キ ャ ラク タモ ー ド , お よび 倍 長 モ ー ド の 変換 
を 実行 し , 正常 に 動作 し ませ ん 。 こ の よう な 場合 , 次 の よう な 命 
令 形 式 で 行 な を ば 正常 に な り ま す 。 


PRINT ン ノン P “回 "|CRI 
PRINT ン P “PB ロ "' [CRI 
も も く は 。 
PRINT ノ P “回 ′ :PRINT ン ノン P “ロロ ' [CRI 


@ パ ー ソ ナル コン ピュ ユー タ MZ-80B 用 「MACHINE 
LANGUAGE」(MZ-8BT05) の 取扱 説明 書 の 訂正 
2 王 和 
写真 ( 下 側 ) | **MONITOR SB-1520** | * ま * ネ MONITOR SB-I520** 


の 画面 Free Area 2I00-FEFF Free Area 2F00-FEFF 
> 


… 以 後 の 出 力 は , テレ ビ 画面 | … 以 後 の 出力 は , 画面 また は ブ 
と プリ ンタ の 両方 に 行わ れる 。 | リン タ の どちら か に 行わ れる 。 


SHARP MZ Software Information 


@ バ パー ソナ ルコ ン ビ ュー タマ MZ-1200 用 取扱 説明 書 「BAS 
IC MANUAL」 の 訂正 


訂正 箇所 誤 


カセ ッ ト ボ タ 
ン の イラ スト 


ceeo mWawue FRWP PAY StoP EECT 
* 39 ee p ロ 


上 か ら 2 行 目 | 26 ペ ー ジ の プロ グラ ム を … | 24 ベ ペー ジ の プロ グラ ム を … 
イラ スト ( 下 ) | 24 ペ ー ジ を 見 る ん だ ね 。 | 22 ペ ー ジ を 見 る ん だ ね 。 


イラ スト (上 ) Ko テー くわ し く は 115 ペ ー ジ を … 


上 か ら | 行 目 | ふた た び 26 ペ ー ジ の … ぶた た げ 24 ペ ー ジ の … 


上 か ら 9 行 目 | し た が っ て 、26 ペ し た が っ て 24 べ ベ 


下 か ら 4 行 目 | 88 ペ ベー ジ で 説明 し ます 。 86 ペ ー ジ て で 説明 し ます 。 


下 か ら 中 | 行 目 41 ペー ジ で 説明 し ます 。 39 ペ ー ジ で 説明 し ます 。 
下 か ら 5 行 目 | 72 一 73 を 見 て くだ さい 。 70 一 7| を 見 て くだ さい 。 


上 か ら 4 行 目 | (74 ペ ー ジ ) 


(72 ペ ー ジ ) 


上 か ら 13 行 目 | 124 ペ ー ジ に 
下 か ら 7 行 目 | 70 DATA 49, 50, … 
下 か ら 5 行 目 | OF MZ-I200 


120 ペ ー ジ に 
70 DATA 90, 45, 49, 50, … 
OF _MZ-1200. 


下 か ら 14 行 目 | RND は 74 ペ ー ジ 
下 か ら 20 行 目 | RND( ) は 74 ベ ペー ジ 


RND は 72 ペ ー ジ 
| RND( ) は 72 ペ ー ジ 


タイ トル 名 演奏 家 MZK 氏 を 訪ね て | 名 演奏 家 MZ 氏 を 訪ね て 


イラ スト … 方 法 は 10| ペ ー ジ 


| … 方 法 は 99 ペ ー ジ 
189 ペー ジ で 使っ た … 
*MZ-1200" 


上 か ら 14 行 目 | 91 ペ ー ジ で 使っ た … 


上 か ら 3 行 目 | 機材 語 プ ログ ラム と は 、 
上 か ら 7 行 目 | 機材 コー ド と いっ た … 


機械 語 プ ログ ラム と は 、 
機械 コー ド と いっ た … 


| 下 か ら 4 行 目 | "MZ-80K" 


@ バ パー ソナ ルコ ンピュータ マ MZ-80B 用 「DISK_ BASIC」 
(MZ-8BD01,MZ-8BD03) の 取扱 説明 書 83 ペ ー ジ 


訂正 笛 所 誤 | 正 


エラ ー | 94 を 越す ファ イル を 登録 し よう と | 63 を 越す ファ イル を 登録 し よう と 
番号 5| | し た し た 


ご めん な さい の ペー ジ 7 の 9 の 


〇 編集 室 か ら 
1 月 号 一 一 10 月 18 日 ( 火 ) 発 売 


信 特 集 ユー ティ リティ プロ グラ ム 
但 F-DO0S5 と CPM 欠 詳 報 MZ 一 5500 


コン ピュ ー タ る ララァ ッ クス の プロ グラ ム を 募集 中 で す 。 


来年 2 月 号 掲載 を 子 定 に 「 コ ンピュータ グラ フィ ックス ・ コ ンピュータ ミュ ー ジ ッ 
ク 」 の プロ グラ ム を 募集 中 で す 。 

周辺 機器 の 使用 も 0K で す 。 ま た , グラ フィ ッ ク 機 能 の な い MZ-80K/C/1200/700 
の 方 の PCG の 利用 . プロ ッ タ プリ ンタ の 活用 も 対象 に 入り ます 。 締め 切り は 11 月 末日 
で す 。 皆 さん の 自信 作 を お 待ち し て お り ま す 。 

また , その 他 投 稿 (ゲー ム , ビジ ネス , ハー ド 製 作 ete) は 随時 受け 付け て お り ま す 
の で , これ ぞ と いう 作品 を どしどし ちち 寄せ くだ さい 。 

な お , 本 誌 掲載 分 に は , 規定 の 原稿 料 を お 支払 いし ます 。 
候 応 募 要 領 氏 
〇 内 容 の 説明 。 利用 法 。 フ ロー チャ ー ト な どの 原稿 に . テー プ (ディ スケ ッ ト ) を 添 
えて お 送り くだ きい 。 原稿 に は 住所 ・ 氏 名 ・ 年 齢 ・ 職 業 ・ マ イコ ン 歴 を 明記 願い ます 。 
〇 投稿 者 の モラ ル と し て , 他 誌 と の 二 重 投稿 , 他 機種 用 プロ グラ ム を 単に 移植 し た も 
の は , 固く お 断わり いた し ます 。 ま た だ た, ブロ グラ ム の SAVE は , 最低 2 回 以上 行なっ 
て くだ きい 。 
〇 宛て 先 は , Oh /MZ「 コ ンピュータ グラ フィ ックス ノミ ュー ジッ ク 」「 投 稿 」 係 で す 。 


@ 本 誌 の お 買い 求め に つい て 介 


最近 。 本 誌 の 品切れ が 相次ぎ , 読 老 の 皆様 方 に ご 迷惑 を むか けし て いる こと を 深く 
お 詫び 致し ます 。 本誌 は 全国 の 大 型 書 店 . マイ コン ショ ッ プ で 販売 し て な り ま す の で 
予約 ご 購入 が 入手 確実 で す 。 品 切れ の た め , や む を 得 ず 本 社 に ご 注文 いた だ く 場合 は , 
送料 実費 を いた だ く こ と に な り ま す 。 

ご 送金 は 郵便 振替 (東京 +-29307) か 現金 書留 で , ご 注文 書 に は 住所 , 氏名 と 雑誌 名 
何 月 号 か を 明記 し て くだ さい 。 な お , バッ ク ナ ン バー 在庫 等 の お 問い 合わ せ は , 出版 
部 (03-261-4095) 宛 に お 願い 致し ます 。 


タス ク フ ォ ー ツ 高知 

チャ ン ピ オ ン ツ フト 

ツク バ マ イコ ュ ン 

九 十 九 電機 

東海 クリ エイ ト 

トム トム ソフ ト 104 


クリ スタ ル ソ フ ト … * 
・12・13・186 一 189 


実務 教育 研究 所 


スト ラッ ト フ ォ ー ド コン ピュ ー タ セン ター 
11・183 一 185 


マイ クロ ラブ 
マイ コン セン ター60 に eee 174 


(⑳IN 人 WW 10 月 号 
念 1983 年 10 月 1 日 発行 
多発 行人 孫 正義 
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SHIFT BREAK 


p 最近 。 N 社 の パッ ク (PC) を 使っ て , DIALOG と い 
う , アメ リカ の デー タベース を 呼出 し て 遊ん で いま す 。 
自宅 の 電話 を ジー コ ・ ジ ー ユ ュ と 都内 某所 に 電話 を か けれ 
ば , 衛星 中 継 で 米国 最大 の デー タベース が 呼出 きれ ます 。 
自分 専用 の 巨大 な 図書 館 を 持っ た よう な も の で , 検 策 は 
コン ピュ ー タ が や っ て くれ ます 。 試 み に Computer Graphic 
で Japan の も の を みた ら Nofile (Ku) 
y 皆さん 今年 の 夏 は いか が で し た か 。 海 、 山 、 で 楽し い 
思い 出 を 残さ れ た こと と 思い ます 。 い や 大 雨 と 強風 の 台 
風 で . さん ざん と いう 人 も いる の で は な いで し ょ うか 。 
夏 の 催し も の と し て , ロボ ッ ト 展 。 マイ コン セミ ナー が 
開か れ , チビ ッ 了 チチ の 人 気 ナ ン バ ボー ワン に な っ て いま し た 。 
読者 の 方 も 色々 お も し ろ い も の (ハー ド , ソフ ト い ずれ 
に し て も ) を 作っ た 方 は 御 一 報 く だ きい 。 (H) 
いよ いよ お 待ち か ね の MZ-LOGO が 売り 出さ れ ま し た 
ね 。 もう 大 分 LOGO に 慣れ た 方 も 多い と 思い ます 。 い 〈 
ら た くさ ん の 記事 を 読ん で も , 実際 に LOGO を 使っ て み 
な いと な か な か 実感 が 湧か な いも の で すね 。 自 分 で プロ 
グラ ム を 書い て , さま ぎ ざ ま な 図形 を ター トル に 描か せる 
の も な か な か 面白 いも の で す 。 も う LOGO で 楽し ん で い 
る 方 も , こ れ か ら LOGO て 楽し 方 も 頑張 っ て 下さ い 。(M) 
ぁ 共 男 性 誌 び .、 ユン ピュ ー タ が 人 間 の 精神 を 破壊 する と 
いう 記事 が あっ た 。 マシ ン 室 ( 当 編 集 室 隣り ) の 学生 を 取 
材 に 来 た た き の , や ら せ の 暗 ら 一 い 写 真 が 載っ て いる 。 
し か し L.A. に 留学 中 の 彼 は , 実は チ テニス に 明け 暮れ る 毎 
日 だ と いう 。 他 の 連中 も まっ 黒 に 日 焼け し て …。 私 な ん 
か た ま の 休日 に テニ ス も し た が , 吾 風 の せい で メ XX だ っ 
た の で す 。 編集 こそ 人 間 の 精神 を 破壊 する ? ( 提 弄 
p 8 月 の 第 3 週 , 楽し い 楽 し い 夏 休み 。 1 週間 休み を も 
ら っ て 北ア ルプ ス に 出かけ た 。 右 風 が 東日本 を 縦断 する 
な ど と いう こと は 決し て な く , 山行 き に うっ て つけ の 晴 
天 が 続い た 。 見 渡せ ば 遠く の 山々 が 青く 輝き , 降る よう 
な 星空 の 下 で 食べ た 夕食 の お いし か っ た こと 。 山 を 下 れ 
ば 町 行き の バス が 大 雨 で 欠 行 、 と いう こと も な 〈 く , す ば ら 
し い 夏 休み だ っ た 。 と 日 記 に は 書い て お こう 。 ク ツー 。(K) 
p 荒れ て いた 。 去年 の 台風 は 川 の 流れ を 変え , 橋 を 落と 
し , 毎年 の よう に 行っ て いた わた し の 好き な キャ ンプ サ 
イト は , 数 ぇ 切れ な い ほ どの , 何 10!., 何 100'。 も ある 巨 
石 で な し つぶ さき され, 一 面 が ゴロ タ 石 の 河原 に 変貌 し て い 
た 。 一 つの 森 , 一 つの 渓流 が 犯 り 狂 っ た 水 に 潰え 去っ た 
の で ある 。 水 の 流れ を 狂わ せ た の は 林野 庁 の 無 計画 な 供 
採 " 事 業 ? で あり , こ れ を 許す われ われ な の で す 。 ク ソ 。(ja) 


信 無 集 安田 千尋 菊川 良子 前 田 徹 
三 武 る み 

松田 辰夫 小林 初 雄 徳永 聡 
Hisayoshi Mikami Hong Liang Lu 
Ronald N. Bilings lan Allen 
有田 隆也 素 野 雅彦 青木 秀 浩 
西畑 文広 tti Rittaporn 

浜崎 昭 杉山 和美 
永沢 し げ る 

中 島 真 子 


人 @ 技 術 
人 @ 海 外 協 力 


人 @ 協 力 


⑱ カ メラ 


@⑮ イ ラス ト 
⑯⑮ レ イア ウト 


思 請 還 譲 的 日 本 ソフ トバ ン ン 発行 の Oh ノシ リー ズ 較 主 斉 


月 刊 


OPC 


10 月 号 定価 480 円 


圏 特 集 BASIC に よる 

プロ グラ ミン グ ス タ イ ル ブ ッ ク 
e カラ ー レ ポー ト SIGGRAPH "83 を みる 

@ 超大 型 オ リ ジ ナ ル ソ フ ト 


PC-9801 家計 簿 プ ログ ラム 


@ マシ ン 語 超 入 門 講 座 _ 
マシ ン 語 , 機械 語 , 真 貝 語 


e プロ グラ ム 紹 介 TS E の PLAY BOY 


・> ホー ム ア プリ ケー ショ ン 
e 図 希 シス テハ 内 ルー チン の 解析 と 活用 ( 続 ) 
e 入 門 シ リー ズ ・ コ ンピュータ は な お ぜ 動 く ぐ 

e 新 連載 経営 診断 (1) 小 売 業 パー ト 1 
@OC-10 CP/M ガイ ダン ス 

@OC-10 JBASIC 移 植 法 


隔月 刊 


Oh!F'M 


好評 発売 中 / 


WM 選 い | 


( 増 ペー ジ ) 


第 5 号 定価 480 円 
m 符 条 グラ フイ ッ ク ツ ー ル いろ いろ 


グラ フィ ッ ク コ マン ド を 使っ て みよ う / 拡 大 ・ 縮 
小 グ ラフ ィ ッ クエ ディ タ / グラ フ 作 成 ツ ー ル な ど 
付録 : レイ アウ ト / パ ター ン デザ イン シー ト 


eOS-9V1.2 と BASIC09 
@ は じ め て 握る は ん だ ご て 
ジョ イス ティ ッ ツク の 製作 
e ゲ ー ム リス ト エイ リア ン FM ク ラフ ラ ツ シ ュ 


季刊 


10 月 18 日 発売 予定 / 


第 2 号 定価 480 円 5 
m 生 555U 用 パッ ケー ジリ フト 


@IBM PC(5150) で 5550 の 可能 性 を 探る 
DR Logo 


es 逆 ポ ボー ラン ド 記 法 実習 プロ グラ ム 
e MS-DOS 用 ス フ クリーン エディ タマ 
es マク ロア セン プラ 

e ケー スス タデ ィ 5550 導 入 オ フィ ス 

es ブロ グラ ム バイ オリ ズム ハ 相 性 率 


Oh! MZ 1983. 10. 7Z7 


5 デュ アル ディ スク ユニ ッ ト 


快走 /iSlkcBUmarklI 


FM-7 FM- 専 用 


大 好評 の disk-80markII シリ ー ズ 。 と 
斉 光 に 加え 、 きら に 静 疲 ・ 高 性能 。 強 走 中 。 lsk-8OPHI 128009 由 


mmDISK BASIC を は じ め FLEX な ど 各 DOS に 対応 。 

和 mmFM-7 の 高速 バー ジョ ン の 対応 も 可能 で す 。 生 接続 に は 
2@ 由 ( 隊 守り 1 隊 填 29 人 fiElm0 隊 加計 : 較 disk-|/OF(15.000 円 ) と CBL-3(5.000 円 ) を ご 利用 下さ い 。 
disk-8OPII 123.000 円 
合 は disk-|/0 P(12.000 円 ) と 接続 ケー ブル CBL-1(5.000 円 ) disk 8OBL 138.000 円 


を ご 利用 下さ い 。 他 は CBL-2(5.000 円 ) で ダイ レク ト 接 続 mm フロッピー イン ター フェ イス 内 蔵 。 拡張 /0 ポ ー ト が あれ 
シス テム ディ スケ ッ ト は 各 対 応 の も の を ご 利用 下さ い ば あと は 接続 ケー ブル (CBL-3) で ダイ レク ト IN。 


MZ-80B  MZ-2000 専 用 


高 性 能 パ ワ フ ル 8 イ ンチ フロ ッ ピ ー デ ィ ス ク ユ ニッ ト 


Disk-PC M160 


新 発 売 株 * タ ィ プ 256.000 円 


CB/M、MS DOS、P-SYSHBIM で で の の io 
数 々 の パワ フル な SOFT が 続々 登場 し て き 
ます 。 ま さき に SOFT 新 時 代 。 

スリ ム な 薄型 設計 。 大 容量 IMBX2 ド ライ ブ 。 


ジネス に 、 パ パーツ ナル デー タタ ペー ス に 。 
ハイ コス トバ ァ ー フ ォ ー マ ンス を 提供 いた し ます 。 


モデ ル 

M160-01(PC980! 用 ) …… olioim 256 ,000 円 
M160-02(PC9801 用 CP/M-86 付 ) ……:298,000 円 
M 160-03(PC880I 用 ) oe 296,000 円 


※M160-02 以 外 は シス テム ディ スク (DISK BASIC 等 ) が 必要 で す 。 
接続 ケー ブル 、 イ ンタ ー フ ェ イ ス 等 は ふく まれ て いま す 


ロ お 求め は 全国 マイ コン ショ ッ プ へ 。 
ロ 電 話 に よる ご 注文 も うけ た まわ っ て お り ま す 。 


株 式 会 社 アイ テム 凡 ia 拓 0466-27-1668(AM9:00-PM8:00) 
プ TEL (0466)27-1668( 代 ) 詳し い お 問合せ は 左記 あて へ お 申込 み 下さ い 。 
ロ disk 専 用 クレ ジッ ト が 用 意 さ れ て いま す 。 


*CP/Ms は デジ タル ・ リ サー チ 社 の 登録 商標 で す 。 * UCSD Pascal rt は カリ フォ ルニア 大 学 理事 会 の 登録 商標 で す 。*FLEXx は TSC 社 の 登録 商標 で す 。 


EnJOYyY じじ OmDuter / 


フロ ッ ピ ビー テイ スク 
アリ ンク ンー 
モニ ター 


PC-8031-2W…… に ooo \148.000 
MZ-80BF(!/0 カ ー ド 、 ケ ー ブ ル 付 )…… で rme \149.000 
LFD-550 シ リー ズ (CI/O ポ ー ト 、 ケ ー プ ブル 付 ) う ドド ドド ドド ドー ツー 
SPA6FE3NDRNS2FIIERA プ 2595 \118.500(MZ 用 の み \102.500) 
TRS-80modelI 用 ミニ フロ ッ ピ ー デ ィ ス ク 

NO.I(DOS ケ ー ブ ル 取 説 付 )…\45,000 NO.2…\36,000 NO.3…\36,000] 
NO.4…\36,000 拡張 イン ター フェ イス (1I6K.32K )… \ 49.000 J 


あな だ の / 「 レ コン へ 押 を ご め て 


MZ-80P6(80 桁 多 機能 ドッ ト プ リ ンタ /|/O カ ー ド 接続 ケー ブル サー ビス )…・…・ 


人 7 人 YS 人 [な (人 7: 人 (Hg0 和 22657. りり 人 (2PeX 人 3) あい \ 138、000 
PC-8023-C( ド ッ ト マ トリ ックス プリ ンタ )…… ド ドド ドド ーー \85.800 
タン ディ 9 イン チラ イン プリ ンタ ー (ケー プル 別 )……… \29.800 
PC-8822 oeeeeeeeaeoeeseeeeeeeeeieeeeeoeeoeeeeeeeeewee の oo ゃ ゃ \ 179.000 
モニ ター 

12 イ ンチ グリ ー ン モニ ター( 各 機種 使用 可 ) ……………… \15,000 


PC-6001mkLL…( バ む …G…ー ド ーー ドー \ 80.000 
PC-8001mkIL ……ー ド ーーーーーーーー \116.000 
PC-8800 1 ( 湊 字 ROM PoC-8801I-01 サ ービス )・・・・・・・・ \200.000 
PC- 9801(Rov Pc-380i! サ ービス \285.000 
三菱 マル チ 8 …… じ に つ ( に ビード ーー \116.000 
TRS -80 ml (限定 特価 ) バド ドド ドド ドド ーー \78.800 
《15 回 均等 分 割 払い の 例 〉 


FM - 7 OR る KA \ 125 000 
カシ オ FP1100 上 ……… で 人 由 ド ーー…ー・ \69.800 
メル パ プ ピ ワ アイ 。 入 on ュ haveysgam saesreaswsa \ 115.000 
M グ 2200 で nsheees meanseeee kcuwaseeos \118.000 


MZ-2000 ( 定 特価 / グ ラフ ィ ッ クボ ー ド 、RAM 付 ) ・・ 学 148.000 


《 新 発売 〉 機能 満載 16 ビ ッ ト マ シー ン / シャ ー プ MZ-5500 


表示 価格 | 一 分 割 払 手 数 料 | 第 1 回 お 払い 額 | | 2 上 隆 お 払い 吾 - 分 割 お 支払 い 合計 額 


PC- 8001MK2 \ II6,000 \ 18,.560 \ 9,960 \ 8,900 
PC-6001MK2 \ 80,000 \ 12,800 \ 7.400 \ 6,100 
PO- 8801I \ 200,000 \ 32 ,000 \ 16,400 \15,400 
PO-9801 \ 285,000 \ 45,600 \22.600 \ 22.000 
MZ- 2000 Y 148,000 \ 23.680 \I2.080 Y Il,400 
MZ- 2200 \II8,.000 \18,880 \ 9,480 \ 9,.100 
MZ- 80BF \ 149,000 \ 23,840 \11,.840 \11.500 
PO-803 に 2W \ 148,.000 \ 23.,680 \12.080 \11,400 
FP- 1100 \ 69.,800 \11.200 \ 5,600 \ 5,400 
FM-7 \ 125.000 \ 20,000 \10,600 \ 9.600 
シス の 4 \115,000 \18,400 \ 10,200 \ 8,800 
マル チ 8 \ II6,000 \18,560 \ 9,960 \ 8,900 
TRS- 80M 1 Y 78,800 \12,640 \ 6,240 \ 6,100 
MZ- 80P6 \ 139.800 \ 22.240 Y Il,440 \ 10,.700 
PC- 8023C \ 85,800 \ 14,.240 \ 8.040 \ 6,800 
PO- 8822 \ 179,000 \ 28.640 Y 14.440 \ 13,.800 
LFD-550 \118,.500 \ 19.040 \ 9,.240 \ 9,200 


Y 134,560 
<14 \ 92,800 
<14 \ 232, 000 
<14 \ 330, 600 
<14 YI7I.680 
<14~ \ 136,880 
<14~ \ 172,840 
X14 \171,680 
<14 \ 8I,200 
く 14_ \145,000 


く 14 \ 133,400 
く 14 \ 134,560 
ベ 14 \ 91,640 
く 14 \161,240 
く 14 \ 103,240 
く 14 \ 207,640 
く 14 \ 138,040 


es 
本 


お 支払 方 法 プ 均等 払い 、 ボ ポー ナス 併用 払い 
お 申し 込み 電話 又は ハガキ で ご 連絡 下さ い 


、 ボ ー ナ ス 一 括 払 い 、3 回 一 36 回 まで の 分 割 払い 等 ご ざい ます 。 毎 月 銀行 か ら の 口座 振替 と させ て 頂き ます 。 
>12 イ ンチ グリ ー ン モニ ター は 機種 を ご 指定 下さ い 。 


通信 販売 も ご 利用 下さ い 。 全 商 品 、 ク レジ ッ ト で も 取扱 いま す 。 


10 ,000 円 以上 送料 サー ビス いた し ます 。 


ご 注文 は 在庫 確認 の 上 、 現金 書留 信 は 、 銀 行 振込 み で お 申込 み 下 さい 。 


創業 26 年 信用 を モツ トー に 信頼 ある 商品 を 安価 に て お 届け 致し ます 。 


有朋 ア マ ノ 電 益 サー ビス セン ター 


〒192 東京 都 八王子 市 北野 町 560-5 


* 京 王 線 北 野 駅 下車 徒歩 3 分 
八王子 より バス 北野 駅 行 北野 駅 前 下車 


本 誌 発 行 時 に お いて より お 求め や すい 価格 に 変更 され て いる 場合 が 


《 水 曜 定休 日 


谷 0426(45)3001⑯ 夜 間 可 庄 


営業 時 間 /AMI0:00 一 PM7 :00》 
ご ざい ます の で 価格 を 再度 電話 に て ご 確認 下さ い 


マイコ 


超一流 メー カー 品 ば か の 全品 集合 中 


- ます ます 充実 の パソ コン 、 ソ フト 、 書 籍 、 バ パー ツ 、 ビ ジネス 機 、 端 末 機 、 ワ ー ド プロ セッ サー、 バ パッ ケー ジ ソ フ ト 、 技 術 サ ポー ト も 万 全 。 


BEDT 3 


手軽 に コン ピュ ー タ と の 対話 が 始ま る 


入門 シス テム MZ-2200 


今 一 番 ナ ウイ パソ コン SHARP* 性 能 の 王 者 SHARI 


こん な MZ を 待っ て い だ / 


見 る 


@MZ 731 

本 体 、 カ ラー プロ ッ タ ー 
フリ ンタ グレ ヨ 
ー ダ ー ご 家 寿 テレ ビ 接 
続 OK) 


標準 価格 1285000 円 
っ ウル トラ デマ ア イス / 


my 


合計 標 価 179,8U 由 
ます 


べ ベス ト セ ラー 機 を 更に お 得 に 


@ バ パー ソナ ルコ ンピュータ MZ-2200 
@12 型 グリ ー ン ディ スプ レイ MZ-1D12 
@ デ ー タ レコ ー ダ MZ-1TO2 


頭金 0 円 月 々 5.800 円 36 回 


一 重 語 菩 


@ 本 体 MZ-2000 | 
@ グラ フィ ッ ク ボ ー ド ーーーーー ャ ーー 
MZ -IR01 n 
加 が ラド 1 tac 
標準 価格 287。000 由 


コジ ンジ ピ ュー タダ タ が 日 夫 語 に 恋 を し た 


EPSON 
還 還 
ーー 


| 


圏 QC-10(CPU キ ディ スク 320KBX2 基 十 漢 字 ROM) 
遼 キ ー ボ ー ド 

画 専 用 グリ ー ン CRT 

画 漢 字 プ リン ターMP-130K( ケ ー ブ ル 込み ) 

田 プ リン ター 用 紙 2.000 枚 


siree 1.00500n 2 と と な と を 


頭金 0 円 月 々 22.500 円 X48 回 お 0 円 


@ FM-7 

@ 電解 カラ ーNH- 14DD 

@ サ ン ヨ ー デ ー タ レコ ー ダ ーMR-11DR 
@ ソ フト 10 本 サー ビス 


合計 標 価 P10,40I 由 


・ 和 和 


頭金 0 円 月 々 5.000 円 X48 回 
お 申込 み 方 法 
(① 商 品名 (メー カー、 型 番 ) ② 合 計 金 額 (定価 合計 で も 自 
動 値引き され ます か ら ご 安心 くだ さい ) ③ お 支払 方 法 ( ク 
レジ ッ ト 、 現 金 、 ま た は リー ス ) ④ ク レジ ッ ト の 場合 
月 払い 及び ボー ナス 払い ご 希望 額 ( ボー ナス 払い を 多少 な 
り 入 れ ま す と 月 額 は 低く な り ま す ) ⑤ お 名 前 (20 歳 未満 の 
方 は 保護 者 の お 名 前 も )⑥ 年 齢 の ご 住所 ⑧ 電 話 番 号 ③ 職 業 
⑲⑩ 他 、 ご 意見 、 ご 希望 以上 を 官製 葉書 に ご 記入 の 上 、 右 
記 宛 ご 郵送 くだ さい 。 
※ お 金 の や り と り は | 円 な し で も 、 お 手元 に 全品 が 摘 い 
ます 。( 頭 金 0 円 の と き ) 
@ 銀 行 振込 ご 利用 の 方 は 住友 信託 銀行 池袋 支店 ・ 普 通 品 
座 No 2706052 に お 振込 みく だ さい 。 [口座 名 :( 株 ) マ イコ 
ン セ ンタ ー 送金 手数 料 は 差引 きも OK] 


池袋 東口 に 良心 的 な マイ コン 大 型 サ ービス 店 _ 


ゴー 


テレ ビ を 視 な が ら 


@ CZ- 
ゅ グラ フィ ッ ク RAMCZ-8GR 
ゃ ソフ ト 5 本 サー ビス 


合計 標 価 3UU 0 円 


シャ ー プ 書院 超 本 格 WD -2400 (最新 型 ) 


し スナ も トミ アル て 1 


ソフ ト も 多 舟 記 当 肖 
SHARP パ ソコ ン テ レ ビ X1 


1 
い 
WW る 


ベー シッ ク 
・ 創 る 
学ぶ ・ 遊 ぶ 
800C/D 


2 


至れ り 尽 せり 、 申 し 分 な い 超 性 能 機 


% 14 イ ンチ 画面 と 対話 e 3WAY 入 力 (か な 、 ロ ー マ 字 、 
ベン ダッ ツチ ) 辞書 8 万 語 ゃ ブラ フ 作 図 機能 演算 機能 
* プロ グラム 機能 @ ぬり が な 、 諸 線 $ デー タ の 抜 出し 、 
並べ 変え 完璧 な 24X24 ド ッ ト 


標準 価格 1。B5,00 


ma 症 光 |.450.0UU ロ 


5 年 リー ス で 月 額 35.970 円 
頭金 0 円 月 々 29,800 円 X60 回 ⑳3 万 3 千 X10 回 


液晶 画面 、( プ リン ター、 マ イク ロカ セッ ト 付 
で すか ら こ の セッ ト の み で すべ て OK / 他 に 
外部 モニ ター、 カ セッ ト 、 プ リン ター、 デ ィ 
スク 装置 に 接続 使用 も 自由 自在 


携帯 型 、 入 門 に も 2・3 台 目 に も ピッ タリ 。 


標準 価格 138 5 


応 相談 


マイ ラン の 疾 多 記 沼袋 二 羽 


ご 来店 、 熱 烈 稚 迎 ./ 朝 10 時 一夜 8 時 


oh/MZ 係 
s03- ヨ 80-13B0⑯ 
〒170 東京 都 豊島 区 東池袋 1-21-5 

サン シャ イン シテ ィ ー 出 入口 前 


盛 局 万 2 厨 刀 届 画 2 [ DAMESDP 


ン 


欧 | RTON 塊 ARS 


SHARP MZ-2200/2000 用 S 1 。 の 
GAME ニ フラ イト シミ ュ レ ー タ ー 履 バクテリア GAMEー ヒロ トン ウォ ー ズ 3 
TAPE2 本 定価 4.000 円 TAPE 1 本 定価 3.500 円 膨 和 ーー、 


SHARP X1 シ リー ズ 記 過 | SHARP X1 シ リー ズ 
GAMEー フ ライ トシ ミュ レー ター& ス ペー スピ ビー GAMEー ヒ ロト ン ウ ォ ー ズ 
TAPE 2 本 定価 4.000 円 フ TAPE 1 本 定価 3.000 円 


@ 内 容 : 飛行 機 の 操 縦 リア ル タ イ ム ・ 旬 内 容 : 美しく 流れ る 星々 の も と 、 突 如 @ 内 容 : 敵 ミサ イル 、 地 軍 を さけ て 敵 戦 車 を 破壊 せよ 

| シミ ュ レ ーション ゲー ム 。3 次 元 か ら 宇宙 パチ の 軍団 が 出現 し た は いつ く の キ ャ ラク ター を 見 る こと が で きる か / チ ャ レ < 
| 2 次 元 肖 変 換 に よる リ ケ テル な 画像 激しく 動き な が ら 体 当り し て くる 宇宙 パ ちい うー の 2 
を 実現 一 度 、 ご 試乗 くだ さい チ に 、 君 は どこ ま て 耐え られ る か "7 の 2 * ンタ 0 


7 1 
snleT 全員 明 | 購 較 


DUETTURE 。 


抽 Itre 
5ererr Brrlge 


時] 和 叶 | に | | 」 cz 
SHARP MZ-2200/2000 用 SHARP MZ-2200/2000 用 
電 時 | GAM ビ ー ニ スタ ー ラ イト アド ベン チャ ー GAMEー ニ ウル トラ セブ プン ブリッジ 村 に 
rm TAPE 1 本 定価 3,500 円 TAPE 1 本 定価 3.500 円 A 8 
SHARP X1 シリ ー ズ SHARP X1 シリ ー ズ 4 
GAME ビ ニス ター ライ ト ア ド ベ ンチ ャ ー GAMEー ニ ウル トラ セブ プン プ ブリッジ 
TAPE 1 本 定価 3.500 円 TAPE 1 本 定価 3.500 円 


@ 内 容 : 俺 は さま ざま な 宇宙 の 旅行 者 。 今日 は 8 つの 星 の 太 陽 系 に @ 内 容 : コン ピュ ー タ 3 人 を 相手 の 本 格 的 モデ プン プリ 0 WW 

みみ で: きび =/ る き i 起 こる か 7 楽し み だ ゼ ぜ ゼン 語 の まる に 、 ウ ルト ラ モ プ ンプ ブリッジ 。 @ グラ フィ ッ ク 機 能 を 活か し た 美 

74 ka WO し い 画 面 で す 。 @7 ゲ ー ム の トー タル で 得点 を 競い ます 。 @ 制 限 時 間 は あ 
り ま せん 。 


-700 用 (APE ! 本 /\3.000) | 還 還 0 | の ラロ と トラ ィ ン myx 
・ ス ター プラ スト ラク アンド ラジ 

・ ラ ウン ド フ ァ イ タ ー kd ー ス クル ー ザ ー は 当社 で 開発 し た も の で す 。 
・ ス クラ ンプ ブル ジョ ー < バグ ファ イタ ー 


@ 新 し い パ ー ト ナー @ ン フト 開発 


Ss に Ca7 ア ga カ OUJF 


誰 に で も 手軽 に 使え る ーー ー 
高級 ソフ トウ ェ ア の 開発 ・ 販 売 


安く な っ た コン ピュ ー タ を 専門 知識 が な く て も 手軽 に 実務 に 役立て る よう に し た い 。 こ れ が 当社 の 願い で す 。 


念 汎用 実務 ソフ トウ ェ ア の 優劣 は 
M ン 〆- 0 0 BB 〇 各種 、 各 規模 の 会 社 に どれ だ け の 適用 性 が ある か …… 機 能 、 
② 操 作 ミ ス に 対し て どれ だ け の 防御 を プロ グラ ム に 組み 込ま れ て いる か …… 品質 、 に よっ て 決 


LE GE 還 明 | 


@ コ ンピュータ を 再 知 し た 会 計 士 数 名 の ノウ ハウ を 結集 し た シス テム で す 。 


| OO0 用 まり ます 。 特 に ② の 要素 は コン ピュ ー タ を 有効 利用 する 上 で 極め て 重要 で す 。 


※(D) は ディ スケ ッ ト 、(T) は テー プ 


| ※ 高 級 財務 会 計 シ ステ ム (D) ABC-16 \150.000 | ※ 売 持 金 管理 シス テム (D) ABC-30 \70.000 


(専用 帳 表 あ り ) デー タ 量 /2.000 件 / 月 得 意 先 ノ 160 社 
デー タ 0 月 科 目 数 /244 種 入力 区 分 ノ 売 上 、 入 金 、 値 引 戻り 、 相 殺 勘 定 
入力 伝票 ノ 入金 、 出 金 、 振 替 、 複 合 振替 取引 先 の 入 カ ンプ ワン タッ チ ・ キ ー+ 3 桁 コ ー ド 入力 
サイ キー 入力 また は コー ド 3 桁 入 力 締切 区 分 /8 種 
帳 表 ン 日 記帳 、 合計 残高 試算 表 、 Pe 決算 報告 書 、 仕 訳 帳 表 類 ノ 売上 入金 日 報 、 得 意 先 元帳 、 売 掛 残高 一 覧 表 、 請求 残高 一 
リス ト 、 仕 訳 訂 正 ・ 取 消 リ 、 マ スタ ー 登 録 リス ト 覧 表 、 請 求 明細 表 、 マ スタ ー 登 録 デ ゲー タ リ スト 
画面 表示 ノ マ スタ ー 登 録 デ ゲー タ 、 残 高 人 タ 、 預 金 口座 別 入出 金 画面 表示 ノ マ ス ター 登録 デー タ 、 残 高 、 入 力 デー タ 一 覧 
合計 、 残 高 試算 表 (『/s、『/ ) 訂正 ・ 削 除 / マ スタ ー 登 録 デ ゲー タ 、 残 高 、 入 力 デ ー タ 
訂正 ・ 削 除 ノ 入力 時 仕訳 デー タ 、FD 内 仕訳 デー タ 、 マ スタ ー デ ー タ 、 残 高 更新 処理 月 末 、 期 末 自 動 更 新 
そ の 他 ノ 締切 年 月 日 は 自由 に 設定 可 。 月 末 ・ 期 末 自 動 更新 、 仮 締 プ リ RE 
陸 完了 BB9 計 5 ア リン ト 可 ※ 買 掛金 管理 シス テム (D) ABC-40 \50.000 | 
※ 簡 易 財務 会 計 シ ステ ム (D) ABC-10 \50.000 応用 紙 タ イプ 9 結 PIT EMI 衣 時 の 
ABC-11 \60,000 専用 紙 タイ プ ※ 給 与 計算 シス テム (D) ABC-50 \50.000 | 
ABC-16 の 簡易 形 シ ステ ム で 、 月 次 の 処理 が で きま す 。 (専用 帳 表 使 用 ) 
入力 は 振 合 伝 上 形式 で 科目 コー ド を 用 いて 入力 。 対象 人 員 /200 名 (IFD) EdakoNS 
帳 表 日 記帳 、 合 計 残 高 試算 表 、 総 勘定 元帳 、 仕 訳 リ スト 、 仕 訳 支給 項目 /14 種 (内 7 項目 は 自由 に 設定 
訂正 ・ 取 消 リ スト 、 マ スタ ー 登 録 デ ー タ リス ト 控除 項目 ノ 13 種 Ian 
※ 高 級 財務 会 計 シ ステ ム (D) ABC-12 \120.000 応用 紙 タイ プ 税 区 分 甲種 、 種 
ABC-13 \130.000 専用 紙 タ イプ そ の 他 / ノ 部 門別 (10 部 門 ) 集 計 、 有 給 管理 、 特訓 全 の 8 条 
帳 表 類 / 作 名 、 給与 明細 書 (以上 専用 紙 )、 支給 一 覧 表 ( 部 門別 、 
ABC16 と 簡易 シス テム の 中 間 グ レー ド 、 決 算 報告 書 の 作成 まで 。 )、 捧 除 一 覧 表 ( 導 門別 、 合 計 )、 地 方 税 納 付 先 別 一 覧 
圏 MY-REPO- 18O 00 た 金 種 表 
横 項 目 の 四則 演算 、 縦 の 大 、 中 、 小 の 中 間 計 が 自由 に 取れ ます 。 ※ 賞 与 計 算 シ ステ ム (D) ABC-51 \40.000 | 
20 項 目 の 複合 検索 が で きま す 。 本) 
計算 結果 の 数 値 デ ゲー タ の 小数 点 の 位置 指定 、 数 値 ゲ ー タ は カン マ の 有無 


指定 も で きま す 。 宛名 プリ ント 、 棒 グラ フ 、 作 表 等 の 多目的 簡易 言語 ABCー50 給 号 計 算 連 動 式 

賞与 支給 額 の 算定 用 試案 表 が で きま す 。 

. 画 顧客 管理 レス テム (D) ABC-62 \30.000 品 帳 表 類 ノ 賃金 台帳 、 賞 与 支 給 明細 書 (以上 専用 紙 )、 支給 一 覧 表 、 控 
除 一 覧 表 、 賞 与 試算 表 、 金 種 表 


販売 戦略 に 有効 活用 する 。1.,000 名 ( 1 顧客 マス タ 


ー に 〒NO、 人 名 等 を 登録 し 各種 の 条件 に より 宛名 ラベ ル 、 該 当 者 リス ※ 年 末 調整 シス テム (D) ABC-52 \30,000 
ト を プリ ント 。 検索 方 法 は 、 地 区 、 業 種 、8 杵 有 の ステー タス コー ド を 組合 5 と に ae 
6 人 別 源 泉 徴収 薄 、 合 計 表 、 一 覧 表 、 総 括 表 
せ 自 在 の 条件 に て 検索 。 OO 
男 高 級 比較 棒グラフ (D) T-11 30.000 | | 下 計 邊 集計 (T) T-01 。Y10.000 
500 項 目 の 月 別 計画 また は 、 前 年 度 実績 等 を マス ター 登録 し 、 実 績 デー タ <R. P  G> 横 7 項 の 四則 演算 及び 60 項 目 の 合計 。 
の 入力 に より 各種 の 比較 棒グラフ を プリ ンタ ー に 出力 。12 ヵ 月 分 の デー タ <6 ヶ 月 サマ リー> 横 6 項目 縦 225 項 目 の 各 平 均 、 合 計 。 
は 計画 と 実績 、 い ずれ も 保存 きれ ます の で 任意 の デー タ 処 理 が 可能 。 
作 表 ン 項目 (4 桁 ) 別 該当 月 対比 グラ フ 、 合 計 グ ラフ 、 総 合計 (実数 )、 | 圏 グラ フ 作 成 () T-10 \10.000 
累計 グラ フ 、 月 別 推移 グラ フ 、 グ ルー プ ( コ ー ド 上 2 桁 別 ーーーー アー ー ィ ーーーー ン アッ ーーー ゴ 
の 同 トグラフ 高級 比較 棒グラフ (T)\15,000(120 項 目 ) 比較 棒グラフ 、 単 純 棒グラフ 、 折 線 グ ラフ 、 ば グラ を の 2 グー に だ 。 
来 社 テ スト 自由 | 
の みみ ログ 晴 来 乏 を 間 200 相 泊 馬 同 各 の 出 導 本 まで き 商 束 下 闘い 。 | 較 グ ラフ 作成 (T) EN \6,000 
@ レ ソフ ント の お 求め は 、 お 近く の 有名 百貨 店 、 シ ョ ッ プ 店 等 の 業務 用 ソフ ト 取 扱い 店 か 
また は 直接 当社 宛 に 現金 書留 か 銀行 振込 み で お 願い 致し ます 。 18 項 目 の 数 値 を 棒グラフ 、 点 グラ フ に し て 画面 、 プ リン ター に 。 


昌 | レー ※ マ ー 意 し て あ ! が の 差 が 多少 あり ます 。 
ー 計 ヒー mi ュー 林 式 4 ※ マ ー ク は K/CI200 用 も 用 意 し て あり ます が 機能 面 の 差 


東京 本 社 〒|60 東京 都 新宿 区 西新 宿 7-7-33 新 銘 ビ ル 新 館 2F 
TEL 03-368-963I( 代 ) 振込 口座 富士 銀行 渋谷 支店 普通 No1412047 
大 阪本 社 〒530 大 阪 市 北 区 中 崎 西 2-2-| 東梅田 入 千 代 ビ ル 3F 
TEL 06-315-8637⑯ 振込 口座 富士 銀行 大 阪 駅 前 支店 普通 No796954 
ン 名 古屋 本 社 〒45| 名 古屋 市 西区 菊 井 2 丁目 6-7 TEL 052-565-0406 


男 還 昌 間 間 間 間 間 間 間 間 還 還 還 較 文 新 清 砂 化 時 代 へ の 提案 文男 還 還 間 間 間 間 間 間 間 昌 間 半 
新 発 売 // ウス 吐 オ リ ジ ナ ル 商 品 


Mー700 用 Tape Version ワー ド プ ロ セ ッ サ ー 
夏 目 瀬 石 の) 

今 ま で 通り の テー プ ベ ー ス で カナ 漢字 変換 機能 付 (漢字 ROM 使 用 せ ず ) 

他 機能 〇 セン ター リン グ 〇 アン ダー ライ ン 〇 反転 文字 O レ イア ウト マッ プ 

O 葉 書 印 字 機 能 付 〇 O 右 づめ 及び 左 づめ 
9 > ちの 方 は 、 半 額 2.000 荷造 送料 \500 と 旧 バ ーション テー プ を 添え て お 申し 込 下 さい 。 
内 容 
スパ イ っ て つら い の ね | どじ な スパ イ で すね , 命令 書 を 探し て 再起 で きる か ? 

SHOCK HOPPER | (ショ ッ ク ホ ッ パ ー) 宇宙 の バー ナ 星 人 と ショ ッ ク ガ ン を 使っ て の 大 激戦 
DOWN BOMB (ダウ ン ・ ボ ン ) 地底 人 (グル パー) を 爆弾 を つか っ て ドン ドン や っ つけ よう 。 


意 さ ( 和 ほ 。 旭 。 愉 陸 アド ベン チャ ー ロ ー ル プレ イン グ ゲ ー ム 


\ 14,000 


| 和 。 | 二 折 生 隊 間 SULT 病 時 
ブラ ッ ク ジ ャ ッ ク | トラ シフ ダーム \ 8.900LO1O1O1OIO1OIOIO 
PO 人 麻雀 | パソ コン 相手 に 4 人 マー ジャ ン は いか が / | 学 3.000| 〇 | O」 JI を ) | を 2 も | 

内 。 [ し て g ラ | 和 | 1 - ] † ー 
レー ダ 2 央 作 幸 | 午 に 。 うっ の りす る と みな た か が を 江 す る か も 、 半 3.000) ] | | 〇 | 〇 | | @ 9 」 
ル 一 レ ツ ト | ご 家庭 で ラス ベ カ ス 気分 \ 3.5000 〇 | |O | 〇 | 〇 1 19 1 
K E N O ( キ ノ ) | 2 アーム で : 没 各紙 を 呼ば 半 で 6 系 ゅ ます ギ ギ 9900( 〇 | 〇 | 5 151O 〇 OS@ (りら O | 
ゲー ムジ ャ ング ラー | ジャ ング ル の 大 蛇 と の た た か いで す 。 学 3.000 〇 〇 | | | は 二 | ] 
TREATorTRICK | 悪魔 と 喰う か 喰わ れる か の 大 激戦 学 3.000 〇 | 〇 | | 1OI | 

さ ヽ $ 名 プ 多 ビン ea 1 ー 夫 民 
セブ ンス タッ ト ポ ボー カー | ぉ 352 を - の 紹 ッ ピ ュー タ ェ | 4.000| 〇 1O1OIOIOIOIOIO| 
守 呈 5 ド ] T oy 1 
花 札 パオ イチ ョ カブ | 美しい 花札 で ぉ 楽し みい た だ け ま す 。 | 学 4,000| | 1 LO | 他 1 
人 花札 花 合 せ [ 生物 と 見 間 絡 いう. Mk 上 4.000 4 1 _1O り Ti l 衣 。 6 
T  V 提 棋 盤 | 棋 講 の 研究 等 に 使え ます 。 \ 3.000」 IOIOIOI@eI@I@I 

Lu 村 WP| 。 由 1 移 3E_IU 
カ ラー 四 人 麻 雀 | ケラ フイ ッ ク RAM を 使っ て 本 物 らし く 。 | 学 4,000| | 還 @⑥ 

連 に 4 っ 二 先 人 に た う - 半 | ne 」 | 半 

ア Fofy チャ ー。 シュ ミレ ーション 等 の | 第 | 1O | 1O | 
5 ゲー ム を 駆使 し 、 キ ャ ラク ター を 成長 さ | | 
徳川 家 康 ょ 、 dk 天下 を 取ら せる こと が で きる | 半 4 (| 

か 、 第 1 弾 少年 編 第 2 弾 棚 間 決戦 前 夜 第 〇 | O | 

ウス キキ オリジナル ビジ ネス ッ プ フト 中 

漢字 ワー ド プ ロ セ ッ サ ー | この プロ グラ ム は 低 価格 を グ 
ラフ イッ ク プ リン ター で 漢字 
処理 が 出来 を いか と いう ye 
ee て 出来 た プロ グラ ム で 

> 使い 方 も 簡単 で す 。 ワ 
2 ま 録 し て 呼び 出し も 番 
号 で えら ぴ ま す 。 漢 字 琶 録 D 還 
ATA と 合わ せ て お 使い 下 き 着 | 
し い \ 
凍 串 重 本 は 人 ne 


TA で す 。 ワ ー プ ロ が な けれ |% 
ば 使え ませ ん 。 1 1395 

ョ 五 吾 HOR」 選 ON に 出 て くる 上 単語 ・ 

英語 事典 PR INCE | 二 63 い の 


MZー1200 MZー80B MZー80 ツ c| や 重 回 帰 分 析 ② 判 別 分 析 ③ 成分 分 析 ④ 因 子 分 析 ⑤ ク ラス ター 分 析 ⑥ 正 準 相関 分 析 | 1 本 

M ズ ー 700 MZー2000 | ⑦ 高 次 回 帰 分 析 ⑧⑤ 数 量化 1 類 ⑨ 数 量化 II 類 ⑩ 数 量化 田 類 ⑪ 数 量化 W 類 デー ター フ \ 3.500 
多 変 量 解 析 | ティ イル | ? 
(マシ ン 語 ) | の 〇 +@+③ 二 ④ 二 ⑤ 二 ⑥ 十 ⑦ 十 ⑲ 一 ④ モ ッ ト セッ ト 25,000 円 

(HuBASIC)⑩ ぉ よび MZ2000・80B | ⑧+⑨⑩+⑪+⑫ 一 モッ ト ( マ ニテ アル 付 ) セッ ト 16,000 円 | 半 35,000 


表 作 成 | 項目 と 項目 の 加 江 生 除 が 出来 ます 。 | 半 4.000 〇 IOIOIOIOI IOIOI 
ウス 吐 オ リ ジ ナ ル 開 発 商 品 〇 発売 中  @ 開発 中 " 〇 1.2 グ ラフ ィ ク RAM 必 要 
MZー 700 セイ コー・GP80D ケー ブル ・ ア ダ プ ター 


セイ コー プリ ンタ ー ケ ー ブ ル | GP 550 E 用 | 1. シ ャ ー プ X 1 に つない で 漢字 が う て ま す 。 
TK 一 55010 共通 | 開発 中 |2. グ ラフ イッ クキ ャ ラク ターROM 


GP700 M 用 シッ ー プ X 1 に つない で カラ ー が う て ま す 
ンプ ルプ ログ ラム ( ス ンコ ピー) (テー プ バ パー 
| 開発 中 グラ フイ ッ ク キ ャ ラク ターROM 


・MZー 700 に セイ コー・GP80D を 接続 ・ 1 行 80 文 字 ・MZー 700 用 ・ ワ ー ド ・ プ ロ セ ッ サ ー 用 に 
Mー 700 漢字 ワー ド ・ プ ロ セ ッ サ ー・ 漢 字 登 録 デ ー タ ー、 ケ ー ブ ル アダ プター セッ ト 価 格 \16.500 


ロ 。 中 ⑤ 荷 作り 送料 は 一 律 500 円 か か り ま す の で お 願い 申し 上 げ ま す 。 注文 は 現金 書留 で 品名 及び 電話 番号 記入 の 上 お 願い 申し 上 げ ま す 。 
の ⑤② 注 文 の 時 は コン ピュ ー タ ー の 機械 等 くわ し く 記 入 の 上 お 願い 申し 上 げ ま す 。 


5 注 株 式 会 社 P ラ ス 叶 7 ビリ ソコ ケリ ビ フケ ヴ ー 


〒930 富山 市 総 曲輪 3 の 6 の 3 人 (0764) 21 一 4181( 代 (内 線 25) 9 営業 時 間 : 午 前 10 時 ゆ 征 後 5 時 


RT 


し な や か な 感性 へ 送り ます 


く ク ロス オー バー ゲー ム と は る?> 


ある スト ー リ ー を ゲー ム 化 する に は 、1 ジャ ン ル の ゲー ム (た と えば リア ル タ イ ム ゲ ー ム ) だ け で は 
無理 びあ り ま す 。 そ の 場面 、 設 定 、 ス トー リー の 流れ に 応じ た ゲー ム が そこ に 展開 され な けれ ば いけ ま 
せん 。 ス トー リー の 中 に 含ま れる スリ ル 、 謎 、 ロ マン 等 いろ いろ な 要素 を 可能 な 限り 表現 し よう と し た 
の が クロ ス オ ー バ ー ゲ ー ム な の で す 。 


で RRBRT ーーーーー- IrrEEthrEnP ーー 


ーーー ラ ッ - - - - - JUUUUUUUL - - 
レー が か 、 


で 開 隊 1 りり いい OODG ょ + ユ ュ トト ト ュ トム ュ よ に ごと ご と と と どど 
B1 ど 3u5G? 3QSG7 ロ 9 寺本 : 
避 1 
. 議 洒 中 


ト に 、、. ・ 6 PBT コピ 7 コ 91 


クリ スタ ル ソ フ ト 販 売 代 理 店 
東京 @@ 株 日 本 ソフ トバ ンク 容 (03) 263-3690 


大 阪 @ 賜 日 本 ソフ トバ ンク 容 (06) 644-0191 { 4 .| 目 


クリ スタ ル ソ フ ト 株 式 会 社 


〒533 大 阪 市 東淀川 区 豊 新 3-8-11 ( い ほ り ビ ル 2 階 ) TE L (06)326 一 8150 


通信 販売 も いた し て お り ま す 。 
ハガキ 大 の 紙 に 品名 、 定 価 、 住 所 
氏名 、 年 令 を お 書き に な っ て 、 現 
金 書 留 か 、 小 為替 で 下記 まで お 
送り くだ さい 。 送 料 は 、 サ ービス 
いた し まま 


支 PERSONAL COMPUTER SOFTWARE 


く ス トー リー の 概要 > 


オク タム 歴 259 年 、 銀河 系 で は 人 類 と ザ グ ロ ス 星 人 の 2 つの 勢力 が 拡大 し 、 両 者 間 で は こ ぜ りあ い が 
絶え な い 。 ザ グ ロ ス 星 人 は 、 人 類 を 倒す た め 、 人 類 の 心 の ふる さと 地球 を 破壊 し よう と た くら む 。 ノー 
ピエ ス 星 の 惑星 軌道 を 変え 地球 に 激突 させ よう と いう も の だ 。 

人 類 は 、 青 い 星 地球 を 救う た め 、 セ ント コス モ 号 と いう 宇宙 船 を 建造 し 、 ザ グロ ス 星 人 の 計画 を 阻止 
する べく 宇宙 へ 飛び 立つ 。 


SHARP X-1 用 コス モク ロス ( 銘 4FAW) 


ブッ に 0 
2 の 2 カセ ッ ト バ ー ン ション \ 4,.80OO 


@ と 


ユニ ー ク な オリ ジ ナ ル ソ フ ト て 躍進 する 


計 AAADION SOFW 


PC-6OOIMK II, PASOPIA-7 用 


リア ル タ イ ムイ ン テ リ ジェ ント ゲー ム 


NE 凡 TROL 
タイ ム バ トロ ー ル 

天 は ゲー ム の 中 の ゲー ム を 見 た か ナ - ナ ント / 
ゲー ム の 中 に ゲー ム が 4 つも ある の だ 

現在 、 宇 宙 歴 2000 年 過去 ・ 未 来 と WARP 

し 4 つの 年 代 の 英 を 破壊 し て ACTION 


CAME を 攻略 で きる か 。 


各 \3.800 


適合 機種 

PC-6001MKII。 PC-8001MKII・8001 
MZ-700, MZ・2200, パソ コン テレ ビ X-1 
FM-7, PASOPIA -7 


囲 幕 トレ ー ナ ー 


囲碁 道場 人 Y3.800 


適合 機種 
PC-800IMKII 8001 


棋譜 や 定石 を コン ピュ ー タ に 入力 し 
再現 し て 見 た り 、 入 力 し た 棋譜 や 定石 を テー ブ に 
SAVE し て お き 、 後 日 再現 し て 見 る こと も で き 
ます 

@ 原 作 /S.Tanig uchi 


一 手 ずつ 


人 @ 移 植 プ MAT 
反射 神経 刑 BASIC+ マ シン 語 高 速 ゲー ム 


カー チェ イサ ー / 各 Y3.500 


適合 機種 
PC-800IMKII-8001 
FM-7 

MZ-700 

MZ -2000・80B 
パソ コン テレ ビ X-| 
還 JR-200 


コン ピュ ー タ が コン トロ ー ル する 車 の 追跡 を う 
まく か わし な が ら 、 路 上 の ドッ ト を 喰い 逃げ で 
きる か 

人 原作 合田 宣 文久 移植 数 内 雄 美 


コン ピュ ー タ ダイ スプ レイ ゲー ム 


ウエ ティ ング レー ス / 各 Y3.500 


適合 機種 
PC-600IMKII 
PC-8001MKIl-8001 
FM-7 

MZ-700 
MZ.-2000・80B 


。。 ウェ ティ イツ グレ ー ス 
パソ コン テレ ビ X-1 


| で rtwrwe rr 
ニニ ーー PAS0PIA-7 


君 は めで た く 結 婚 に ゴー ルイ ン で きる か 。 そ れ 
と も 破産 の うめ き に あい 、 地 獄 行 と な る か 
@ 原 作 - 白 木 善 喜 @ 移 植 今風 亭 馬 愚 鳥 


パソ コン テレ FXt 


@ 原 作 平岩 徳 一 々 々 ぎ さ > gy 
@ 移 植 夏 目 明 彦 、 みか し お むか し レン ク ムシ ゲー ム と 絵本 が か が ッ キン ク 
た ーーー ー- 

むか し も か し ゲー ム ①  / 硫 1 | 訪 Ub か し アー ム ② = 

各 \3.800 | | 各 \\3.800 

適合 機種 ) | 適 人 機種 / 

PC-6001MKII PC-6001MK II / 

PC-8001MKII PC-8001MKII / 

PC -8801 PC-8801 

FM-7 FM-7 

MZ-2200 MZ-2200 

PASOPIA-7 PASOPIA-7 

イヌ 、 サ ル 、 キ ジ を お と も こ 

2 2 や @ 原 作 ン 小嶋 

コ 人 @ 移 西安 井 高 次 踊り を 見 る こと が で きる か 。 @ 移 西 安井 高 次 


日 本 地図 と 地図 あて ゲー ム ( マ ニュ アル 付 ) 


マッ プ -47 各 Y3.800 


ュ ア ル 付 


科 池 的 競 天 所 想 学 ( マ ニュ ア 


適合 機種 
PC-8001 MKII 
PC-8801 
FM-7 
MZ-2000・80B 


デー タ 数 3100 個 に 及ぶ 精彩 グラ フィ ッ ク 日 本 地 
図 に よる 県 別 地図 の 勉強 と 大 人 も 楽し め る 地図 
あて ゲー ム 

@ 作 白木 薔 語 


反射 神経 型 BASIC+ マ シン 語 高速 ゲー ム 


ジャ ン ピ ン グ ク ロス / 各 Y3.500 


適合 機種 
PC-8001MKII・8001 
FM-7 

MZ-700 

MZ -2000・80B 
パソ コン テレ ビ X-| 
JR-200 


Jumper を 操り 、 右 端 か ら 流れ て くる Meteor( あ る 
い は UFO0) を 避け な が ら 墓 に 下っ て いる ダイ ヤ モ 
ンド を いく つと れる か 

@ 原 作 プ 合田 宣 文 人 @ 移 植 プ 数 内 雄 美 


星空 の 旅 
ザ ・ プ ラ ネ タ リウ ム / 各 Y3.500 


適合 機種 

PC -600IMKII 
PC-8001MKII 
PC-8801 

FM-7 

MZ-2000 

パソ コン テレ ビ X-1 
PASOPIA-7 
北 天 ・ 南 天 別 に 四季 の 星座 を 満 大 で きま す 

@ 原 作 プ 白木 善 喜 @ 移 植 今 風 亭 馬 愚 鳥 


ザ ・ パ ドッ ク / 和 Y3.800 


JR-200 
持ち タイ ム (② 前 走 タ イム ③ 脚 質 一 等 15 種 の 
デー タ を 入力 し て 、 勝 馬 を 了 予想 し 連 複 券 を 推 せ 
ん し ます 

@ 作 プ ビ ックス マイ コ 


シミ ュ レ ーション ビジ ネス ウォ ー ゲ ー ム 


コン ピュ ー タ ウォ オーズ / 各 Y 3.500 


適合 機種 
PC-800IMKIl・8001 


パソ コン テレ ビ X-| 


UE いじ に に いり 


君 は コン ピュ ー タ 会 社 の 営業 部 長 。 現 在 10% の 
シェ ア を 3 年 後に 50% に で きる か …… 
@ 作 白木 善 喜 


楽し い 星座 教室 (マニ ュ アル 付 


ザ ・ ス ター ズ / 冬 Y3.800 


適合 機種 
PC-8001MKI 
PC-8801 

FM-7 
MZ-2000・80B 
パソ コン テレ ビ X-] 


北 天 ・ 南 天 別 に 月 、 日, 時 刻 を 変え て イン ブッ 
ト す る と 各 星 座 の 動き を 見 れ ま す 

また 星座 を 拡大 し て 見 る こと も で きま す 

人 @ 原 作 舘 盛 光弘 便 移 植 / 北 村 隆 次 


人 生 シ ミュ レー ショ ン ゲ ー ム 


ザ ・ サ クセ スマ ン 各 Y3.500 


適合 機種 

PC-600IMKIi 
PC-800IMK II 8001 
FM-7.8 選 
パソ コン テレ ビ - X-] 

MZ-700, MZ-2000・80B 
PASOPIA-7 


適合 機種 
PC-6001MKII 
PC-800IMKII 
FM-7 

パソ コン テレ ビ X-| 
MZ-2000 
PASOPIA-7 


君 の 人 生 は 平穏 無事 か 。 そ れ と も 波 ら ん 万 丈 か 
君 の 人 生 を シミ ュ レ ー ト し て みよ う 
@ 作 白木 状 喜 


シミ ュ レ ウー ジョ ン ウ ォ ー ゲ ー ム 


コン バッ ト -47/ 税 Y3.500 


適合 機種 
コン バッ ト -47 誠 DL 
ング PC-8001MKII・8001 
ピン FM-7 
MZ-700 
や ) MZ-2000・80B 
パソ コン テレ ビ X-1 
PASOPIA -7 


1 一 4 人 て 楽し め る 知 的 戦略 ゲー ム 
47 か 国 の うち 君 は 何 か 国 を 占領 で きる か 
@ 原 作 白木 善 喜 @ 移 植 今風 亭 馬 愚 鳥 


優勝 チー ム 予 想 ゲ ー ム 
各 Y3.800 


適合 機種 
PC-800IMKI8001 
FM-7 

MZ -2000・80B 
パソ コン テレ ビ X-1 


チー ム が 集まり 草野 球 。 持 点 を 嗜 け て 最後 の チ 
ー ム を 予想 。 ゲ ー ム 十 集計 プロ グラ ム 
@ 作 プ ビ ックス マイ コ 


②⑳ お 求め は 、 お 近 ( の マイ コン ショ ッ プ また は 、 チ ャ ン ピ オ ン ソ フト 販売 交 通 販 部 宛 に 品名 と 機種 氏名 、 住 所 、 電 話 番号 を 記入 の 上 、 現 金 書 留 に て お 送り (だ さい 。( 送 料 は 無料 サー ビス ) 


制作 ( ほ 3 株 式 会 チャ ヤン ピオ ン ソ ント 


〒530 大 阪 市 北 区 西天満 6 目 1 番 12 号 瑞穂 ビル 
TE (06)365 一 9900 ファ ックス (06)361 一 1176 


% 借 \ チ ャ ン ピ オ ン ン ント 販売 株 式 会 社 


本 社 ・ 通 販 部 〒657 神戸 市 灘 区 篠原 北町 1T 目 5 番 13 号 
TEL (078) 801-2727 ファ ックス (078)882-0555 
東京 営業 所 〒111 東京 都 台 東 区 蔵前 4 丁目 33-7 山 愛 ビ ル 


TEL (03)866 一 8447 


ユニ ー ク な オリ ジ ナ ル ソ フ ト て で て 武 進 する 


@9CHAAtPION SOFW 


々 発売 開始 中 ク 文 診 計 5 


に 適合 で きま す 


イン テリ ジェ ント シミ ュ レ ーション ゲー ム イン テリ ジェ ント シミ ュ ピ ーション ゲー ム タイ プ ト レ ー ナ ー 


Dr . 麻 酔 科 医 / 各 Y3.800 タイ プ 練 田 / 各 Y3.800 
適合 機種 適合 機種 - | 適合 機種 
PC-6001MKII ト PC-6001MKII | PC-6001MKII 
PC-8001MKII 融 時 PC-8001MKII PC-8001MKII・8001 
PC-8801, FM-7 軸 PC-8801,FM-7 MZ-2200・2000・80B 


MZ-700,MZ-2200 
パソ コン テレ ビ メ X-1 
PASOPIA-7 


還 MZ-700,MZ-2200 

パソ コン テレ ビ メ X-1 
PASOPIA-7 

血圧 、 体 温 、 麻 酢 レ ベル 、 出 血 量 、 
心電図 を 見 な が ら 、 無 事 手術 を 
完了 させ る こと が で きる か 

@ 原 作 / 平 岩 徳 一 @ 移 植 / 御 給 尚 


時 FM-7, パソ コン テレ ビ X-1 

| PASOPIA-7 

叶 基礎 コー ス で は 、 ア ルフ ァ ベ ッ ト 
の 練習 、 実力 養成 コー ス で は 、 
BASIC 用 語 等 を 練習 で きる タイ 
プ ト レ ー ナ ー 

@ 原 作 プ 森泉 平助 


4 9 月 | 日 より 人 チ ャ ン ピ ビオ ン ソ フト と エヌ ・ テ ィ ・ エ ル 産 業 費 の 共同 出資 に より 、「 チ ャ ン ピ オ ン ソ フト 販売 株 式 会 社 」 を 設 
ら 立 す る と と も に 東京 営業 所 を 開設 し まし た 。 こ れ に 伴い 、 チ ャ ン ピ オ ン ソ フト の 発売 元 と し て の 業務 は 新 会 社 に 引き 継ぐ 


西 歴 200X 年 。 天候 異変 に より 大 凶作 が 数 年 続き 食糧 バ パ 
ニッ ク が 発生 。 知 恵 を し ぼっ て 食糧 増産 に 努力 され た い 
@ 原 作 プ 平岩 徳 一 久 移 植 プ CAT'S EYE 


せ 
5 私 
- 六 こと に な り ま し た 。 エ ヌ ・ テ ィ ・ エ ル 産 業 総 と 同様 、 ご 指導 、 ご 和幸 提 を 賜わり ます よう お 願い 申し 上 げ ま す 。 


⑦ お 求め は 、 お 近 ( の マイ コン ショ ッ プ また は 、 チ ャ ン ビ オン ソフ ト 販 売 弥 通 販 部 宛 に 品名 と 機種 氏名 、 住 所 、 電 話 番号 を 記入 の 上 、 現 金 書留 に て お 送り (だ さい 。( 送 料 は 無料 サー ビス ) 


人 (株 式 会 せ チ ャ ン ビ オン ソフト  %xx 介 き チャ ン ピ オ ン ン フト 販売 株 式 会 社 


時 R ea 本 社 ・ 通 販 部 〒657 神戸 市 灘 区 篠原 北町 1 丁 目 5 番 13 号 
- 〒530 大 阪 市 北 区 西天満 6 」 目 1 番 12 号 瑞穂 ビル TELL(078) 801-2727 ファ ックス (078) 882-0555 
、 TEL(06)365 一 9900 ファ ックス (06) 361 一 1176 東京 営業 所 〒111 東京 都 公 東 区 蔵前 4 丁目 33-7 山 愛 ビ ル 
ui 5 TEL)03)866 一 8447 


凌い て ーー ーー 3 の 0 


し _ 邦 ぐさ 
/ 


電 ・ : ウン W 


ツク モ オ リ ジ ナ ル ワ イ ヤレ スジ ョ イス ティ ッ ク 


この 度 、 ツ クモ 電機 で は 、 世 界 に 先駆 け ジ ョ イス ティ ッ ク 
の 究極 の 姿 と も 言う べき コー ドレ スジ ョ イス ティ ッ ク を 
開発 致 し 1 し 沈 。 5 NN 
“ジョイスティック が コー ドレ < の SS が ST 
と 言う ご 質問 も ある と 思い ます 誰 織 我々 は で ど に か く 新 し 
い 事 に 挑戦 し て みた か っ た の 氏 拓 下 

今後 共 、 常に 創造 性 に チャ レジ 張る ツク モ の 活躍 o 
ご 期待 下さ い 。 S シー 


ーーーーー 


Sm、 


で 送 光 部 


り 寸法 
受光 部 
寸法 : 106X62X29" 


100X4 区 387 


較 使 用 可能 機種 
ON  C:PC-6001MKII、PC-6001 
O コモドール : VIC-1001、64 


ne を 、 Oo シャ ー プ : パ ソコ ン テ レ ビ X-1 
ペー ん O 東 芝 : パソ ピア フ 
O ナ ショ ナル : JR-200 
画 主 な 仕様 
2 O 使用 半導体 : 7IC、7 ト ラン ジス タ 
に 4 ダイ オー ド 
Ss 伝送 媒体 : 赤 外 光 


Oo 到達 距離 : 3m 前 後 
o 電 。 源 : 送 光 部 単 83X2 本 
受光 部 9V AC ア ダ プター 付 
お 問い 合わ せ は … 
容 03(251)7395 ツク モ オ リ ジ ナ ル 商 品 開発 部 酒井 迄 


員 け る な /MZ-700「 グ ラフ ィ ッ ク 機 能 」 生生 六 eo) 
-、. MZ-700 フ ァ ン 待 紀 の メカ TPCG-700」\29.800 で 登場 / 


9 ce 
計 @ PCG-700 は “Programable Character Generator" の 略称 で MZ-700 が 持っ て いる 

し キャ ラク ター を 自由 に 作り 変え る 事 が 出来 る 画 期 的 な 周辺 機器 で す 。 

ーーー @ 最大 256 種 類 の キャ ラク ター が 定義 出来 ます 。 

る @ 再 定義 に より 、 無 数 の 文字 が 表現 可能 で す 。 

SMZ-700 の メモ リー は 使用 し ませ ん 。 | 
@ PCG の ON/OFF は 基板 上 の スイ ッ チ 又は 、 プ ログ ラム で 行ない ます 。 
@ PCG-700 は 、 バ スタ イプ で す の で CPU を 取り は ず す 必要 は あり ませ ん 。 


司 096 温 誕 店 faie29 居 用 PCG-700] ツ クモ オリ ジ ナ ル ソ フト 3 本 ニニ \38.800\29.800 送 料 \1.200 
湯村 所 ソフ モ 全 国 ク レジ ッ ト OK メ 7 


シ ク モ 
! 
03(251)9911 へ | に 入 語 aa2 レ ント が です を の な に (AM ( 労 呈 太秦 灯 株 式 
3 0 金利 が か か り ま す 。 SW ア 。 会 
の ま は 、 こ : こ な り た い 商 品 
の 電 書 久 に て お 隊 い | 960 回 払い まで 出来 ます 。 但 、1 回 の 二 払 い 額 は 3.000 円 以上 。 7 


し ます 。20 万 円 以上 は 銀行 振込 み も 取り @ その 場 て 、 お 持ち 帰り で きる クレ ジッ ト も あり ます 。 ニュ ー セ ンタ ー 店 。〒!0I 東京 都 千代 田 区 外 神 田 !-!6-!0 容 03(251)0986 一 8 


扱っ で お り ま す 。 | お 問い 合わ せ 下さ い 。| @ 印 鑑 、 身 分 証明 書 (免許 証 な ど ) が 必要 で す 。 沿 、 学 生 の 方 及 | "  ” ラン ォ セ ンク ー- ア 模 ヒ ル 内 容 052(263)16gni 


HAL 研究 所 製 PCG-700 
Y29.800 


今 、 入 手 の チ ャ ンス / 


田 通 信販 売 は 〒|0I 東京 都 千 代田 区 神田 郵便 局 私 書 箱 135 九 十 九 電 機 帆 MZIO 係 


行 び 、 未 成年 の 方 は 、 ご 両親 の 保証 も 必要 で す 。 5 号 店 〒IOI 東京 都 寺 代 田 区 外 神 田 3-!1-14 窟 03(251)0531 一 2 
富 二 銀行 神田 支店 @ 取扱 い ク レジ ッ ト カ ー ド : 日 本 信販 、JCB、DC、UC、VISA、MC、CF フ 号 店 〒io」 東京 都 千 代田 区 外 神 田 !-9-9 容 03(253)4 199 
普通 口 座 No.894047 @ 沿 、 ク レジ ッ ト カ ー ド ご 使用 の 場合 は 、 手 数 料 が か か り ま す 。 し 幌 店 〒960 札幌 市 中 央 区 南 二条 西 3-!5-! 
ー a さっ し ん ビル B| 容 0II(241)2 299 
圏 ご 注文 商品 の 中 、 未 着 の 品物 が ご ざい まし た 時 は 、 通 販 受 付 電話 で 納品 書 No を お 知ら せ 画定 休日 東京 各店 は 毎週 木曜 日 と 第 3 水曜 日 、 名 古屋 店 は 毎週 月 曜日 


下さ い 。 尚 、 商 品 の 詳し い 取り 扱い 等 は 、 各 販売 店 まで お 問い 合わ せ 下 さい 


。 日 本 語 ワ ー ド ブロ セッ サー 


ダー 
| 6 受付 中 7 


全国 マイ コン ショ ッ プ で 予約 受付 中 


《 …_ 


〇 


の コ 


CEN7p 


日 本 語 ワ ー ド プロ セッ サー 
as 筆 3 区 


WOAD PRO 


38.000 ロ * 
日 7 
文例 集 付 


『 
取扱 い 説明 書 


す ぐに 「 一筆 啓 上 」 で きる 日 常 使用 文例 集 デ ィ ス 
ケッ ト が つい て いま す 。 日 付 や 名 前 を 書 こ だ け で ほとん ご ど ご そ 
画 日 本 語 の 文章 の 作成 、 編 集 、 保 存 が あ 


画 渓 字 の 検索 や 登録 、 熟 語 の 検索 ・ 登 録 な ど 


の まま 使え る 文例 集 で す 
田 わ びり や すい 


な だ の X1 で 簡単 に お こ な え ます 

の 操作 は 簡単 。 画 目 こ やさし い 青 い 画 面 に 、 大 き な 文 字 で 表示 し ます 

マニ ュ ア ル 付 で 、 そ の 日 か ら ど な だ で も 使え ます 

画 要 若 字 OM-V-RAM 画 X1 用 プリ ンタ マー シャープ ブ CZ-800 使 用 
〒336 浦 和 市 南浦 和 2-36-15 谷 0488(85)5222( 大 代表 ) 


に 
STRATFORD 

スト ラッ ト フ ォ ー ド ・ コ ンピュータ ー セ ンタ ー 株 式 会 社 

文 購入 を 希望 な さる 場合 は 上 記 の プロ グラ ム 名 ・ 機 種 ・ 電 話 番号 を 明記 の 上 、 現 金 書 留 で 当社 Oh! MZ 係 まで ご 注文 下さ い 。 〔 郵 送料 は 不要 で す 。〕 


2。 
WW さ ペ 
ざ 。/ 


弘人 失 人 


衝 多 mm C.A.l、[ 教 育 用 ソフ ト 317 種 完成 ,/ ] 人格 9 寺 


スト ラッ ト フ ォ ー ド の 教育 用 ソフ ト は 
) 罰 「 家 話 教 師 セ ンタ ー 四 

〇 罰 婦 部 の 学習 指導 領 
〇 一 形式 を 採用 し て いま す 
〇 子 習 ・ 復 習 に 最適 で ある の は 勿論 、 学 習 聞 で も 好評 を いた だ いて お り ま す 。( 
ー 一 全 種 取扱 説明 書付 。317 種 が 完成 し まし た 。 
1 (実験 シシ ミュ レー ショ ン シ リ ー ズ は 、 す べ て ブック 型 パ ッ ケ ー ジ 入り で す 。) 


O O 


習 館 」 の 監修 の も と に 作成 され ます 。 


- 準 拠 し た 内 容 を 備え 、 し か も 、 楽 し く 学 べ る ゲ ム 


中 学 必修 英 単語 中 学 必修 英文 法 
中 1 一 中 3 各 教 科 書 別 \3.000 中 1 一 中 3 \3.300 


物理 実験 シミュレーション 
| ] 


ブッ ク 型 \4.800 


で "ンチ イコ クウ 19 オー る 


尽 】: 5 オー る R2 


PC-8801,FM-7・8 


中 学 必修 英作 文 


中 1 一 中 3 \3.300 


正解 に は バン ザイ を 三 
run 一 running 


金 金 ツキ ノ モン タダ イラ エイ ゴ ニ ナオ シナ サイ 乱 念 
ーーーーーーーーーーーーーーーーーー 一 一 


?2 
の 


MZ-2200・2000・80B, PC-8001・6001.FM-7-8. パ ソ ヒ ア , 
PHC-25, レ ベル 中 FP-1100・1000,X-07. マ ル チ 8 


MZ-2000・80B, PC-8001・6001.FM-7・8. パ ソ ビ ピア , PHC-25, 
JR-200. レ ベル 忠 ,FP-1100・1000.X-07. マ ル チ 8. X1 


中 学 必修 数 学 児 教 育 し か ず あ そ び 1〕 
中 1 一 中 3 各 上 巻 発売 中 \3.300 3 以上 \3.300 


3 回 間違え る と ログ ゲッ ト が 稀 突 


本 ーー oc だ へ ) 
ハヤ オキ シオ クチ =: 当 イ 


3 ea -9a 


We do not (have to) 
get up early on Sunday 


MZ シ リー ズ , PC-8001・6001.FM-7・8. パソ ヒア . 
PHC-25, JR-200,FP-1100・1000, マル チ 8 


中 学 必修 国語 文法 


中 学生 向き \3.300 


PC-8801・8001.FM-7・8, マ ル チ 8 


児 の え も こら 
3 才 以 上 


\3.300 


* Cgso て] 


も ん だ い apple 
な ん ば ん で すか ? 


PC-6001, JR-200, レ ベル 皿 , PHC-25, マル チ 8 


古典 〔 文 法 


中 学生 ・ 高 校生 向 \3.300 


( a+1 )(bー1 ) ニ マ で ママ 
三 ョ ローa ョ + キ ロー3 Se 


臣 e 
ュ ' 
MZ-2200・2000・80B・1200K/C・K2E. PC-8001.FM-7・8, 
レベ ル 中 ,FP-1100・1000. JR-200,. マ ル ヂ 8 


日 本 史 年 表 
中 学生 向き 


| eee go の Co ん C ょ saee | 


ーーー ガ ざ を じゅ ん に 
と お つて めい ろ 


ガ ら で て ぐだ さい 


正解 の 場合 は 、 ボー ル を 回 し ます 


PC-6001. JR-200,. レ ベル 皿 、PHO-25 


世界 史 年 表 
中 学生 向き 


\3.300 


EZ21 2 
EZEEE 記 の 


竹 ザ オ お じ さ ん 一 


MZ-2200・2000・80B, PC-8001.FM-7・8, 
レベ ル 皿 , マルチ 8 


化学 [元素 記号 マス ター] 
\3.300 | | | 中 学生 ・ 高 校生 向 \3.300 | 


も 22S の OS の 
ez| ント | | 
sh 


PC-8001, レベ ル 


日 本 文学 史 
中 学生 ・ 高 校生 向 


\3.300 


* ネ ダイ セイ カイ ネ 


ヤヨイ ヤマ ト 
人 
ダイ ミ ョ ウ ギョ ウレ ン ツン 


CA 前 


アス メカ 


アメ リカ タイ リク ハッ ケン 一 1492 


キン イン ヲ ウケ ル 

・」 ワ ドウ カイ チン 
9 . ケ ン ボ ウ 7 ジョ ウ 
4. . タイ カノ カイ シン 


MZ-2200・2000・80B, PC-8001.FM-7・8, パソ ピア, 
JR-200,FP-1100・1000, レベ ル 想 , マル チ 8 


MZ-2200・2000・80B, PC-8001, FM-7・8, 
パソ ピア , JR-200,FP-1100・1000. レ ベル 皿 


中 学 必修 理科 中 学 必修 理科 
第 一 分 野上 \3.300 | 第 二分 野上 \3.300 | 


LU 99 ta7 LU 


MZ-2200・2000・80B. PC-8001、FM-7・8, パ ソ ビ ピア , 
レベ ル 四 、X-07.FP-1100・1000, マル チ 8 


物理 [運動 と 力 〕 
中 学生 ・ 高 校生 向 


\3.300 


mm ダイ セイ カイ ーーーーー 


ムラ サキ シキ ブー 3 ムラ サキ シキ プ ニ ッ キ 


ーーーーーー タ イロ ウイ ョ ウレ ツー ニー 


IA 


MZ-2200・2000・80B, PC-8001. レ ベル 


物理 (エネル ギー] 


中 学生 ・ 高 校生 向 \3.300 


グン ツキ ゴ ウ ラ ヲ シメ シナ サイ 
(1) カリ ウム 


コタ エ ae KK 


MZ-2200・2000・80B. PC-8001. レ ベル 吊 . 
マル チ 8 


MZ-2200・2000・80B. PC-8001. レベ ル 吊 


率 SiS /2/9 
1 
1 


Y 村 9779 ン 2 
1 
VoVo 率 sinS 


Y=Vo*t*smS 


ー9 畔 ( 畔 (/2 


VO*VO 一 wlx 
還 Sm2S/g 


MZ-2200・2000・80B. PC-8001.FM-7・8, 
レベ ル 四 


る ネツ ト オン ド エネ ルギー 


20 て で ノ ミズ 400sz ト 60C ノ ミズ 100mz ラ 
ア ゼ ア ワ セ ル ト ナン ド ノ プ ミズ ニニ ナル カ 


EFZ 4| 9 


を 
ノ 


る me 


MZ-2200・2000・80B. PC-8001,FM-7・8, 
レベ ベル 


監修 才 師 セン ツー STRATFORD CO.A.L 


楽し い 国 語 〔 漢 字 〕 楽し い 算 数 
小 1・ 小 2 要 V-RAM1 \3.800 | | | 小 1 一 小 5 各 上 巻 発売 中 \3.300 


た だ し いよ みか た を いれ な さい 
1 も ん くん 


|, ま ち 
ュー 3 


< だ いせ いか い 4 
2 タイ セイ カイ リプ = や 


MZ-2000・80B MZ シ リー ズ . PC-8001・6001. JR-200. マ ル チ 8 


速 習 英文 タイ プ ひら が な 百人 一 首 
\3.000 | | | 要 V-RAM1 \4.500 


1W や”” 。 ES 
ダダ ご デル タン ゴ ヲタ ダシ ク 
2 お クダ サイ 


MZ-2000・80B.PC-8001 .FM-7・8 MZ-2200・2000・80B MZ シ リー ズ PC-8001.FM-7・8 X1, JR-200 


MSX に 教育 用 ソフ トウ ェ ア が 近日 登場 只 5 才 だ に 


新しい 赤 一 ムコ ンピュータ の た め の 


ゃ NOiI を 
ツキ ノ ケイ サン ラ ヲ シマ ショ ウ 


プア の 。 9659 

る 6.61741 ア 
る 2. 2689 さ 4 
57.920451 
ささ. 571968 
49.22 さ 48S 
44.87S5QOO2 
40.S526519 
さ 6. 17BQ さ 6 
さ 1 . 82955 さ 


2 3 
+ 4 ロ 有 2 坦 ロ 
2 7 


エ へ いか いさ す 
ささ こ と ほど る 
で きす か Sn 


トン と そく 2 


R 
に に 】 
ひ 《 
の へ 
うみ も 


も 
# 5 


信人 さと wmS ン Sa す ゃ トニ 


じ て モ ロ ュ オス 


MSX と は 、 一 般 家庭 へ の 普及 を 客 指 し て 、 


新しい 教 診 故 ソフ 統一 され だ 仕様 の も と に 開発 され る ホー ム バ 
3 ルコ ルビ ロー きゃ 
0 SX の 登場 に よ つ て 、 バ ソコ ン は 家 
に まで 起 速 に 普及 する こと と な る で し よう 。 
家 ] ン 利用 に は 、 様 々 用途 が 
られ ます が 、 な か で も 教育 機器 と し て の 
利用 が 注目 され て いま す 。 
中 学 必修 英 単 語 (中 1 中 2: 中 3 の 計 3 作品 ) 化 学 (元素 記号 マス ター) (中 学生 ・ 高 校生 向 ) 了 
] ルイ ロゴ * sz あし い / こ ルン よ づ ヴ o て 先 ] 代 


楽し い 算数 (4・ 下 、 小 5・ 下 、 小 6・ 下 の 計 3 作 品 ] 日 本 史 年 表 ( 中 学生 ・ 高 校生 向 } 幼 児 の えい ご (3 以上 ) ぐだ さい 


レ ベル 中 , マル チ 8, FM-7・8, PC-8801mKII, X-07, MZ-700, MZ-2000 各 機種 用 ブッ ク 型 パッ ケー ジ 発 売 中 。 価 格 は 3.800 円 か ら 。 

文 購入 を 希望 な さる 場合 は 上 記 の フ ロク ラム 名 (教育 ソフ ト の 場合 は 教科 書名 や 学年 、 上 下 別 も ) ・ 機 種 ・ 電 話 番号 を 明記 の 上 、 現 金 書 留 で 当社 
Oh/MZ 係 まで ご 注文 下さ い 。 〔 郵 送料 は 不要 で す 。〕 

当社 ソ フト ウェ ア 総 合 カ タロ グ を ご 希望 な さる 場合 は 、 住 所 ・ 氏 名 ・ 年 令 ・ 職 業 を 明記 の 上 、 資 料 請求 券 と 切手 200 円 分 を 同封 し て 当社 まで ご 請求 下さ い 


- ド ・ コ ンピュータ 


[南浦 和 東 口 駅 前 ・ 埼 銀 隣 り ] 容 0488(85) 5222 大 代表 


KN ks 還 


全 景 レ シン ボル マー ク 編 集 部 授業 風景 


スタ ッ 募集 / @ 開発 部 / シ ステ ム エ ン ジニ ア 、 プ ログ ラマ ー……- 教 育 用 ソフ ト ・ ゲ ー ム ソフ ト ・ ビ ジネス ソフ ト ・ 言 語 等 の 企画 開発  @ 営 業 部 / 営 業 ス タッ フ 、 商 品 管 
ッ フ ゞ 理 ス タッ フ @ 舞 集 部 / 編 集 ス タッ フ …… マ イコ ン 雑 誌 ・ 単 行 本 の 企画 編集 [応募 」 詳細 は 電話 で お 問い 合わ せ 下 さい 。 (応募 の 秘密 は 厳守 し ます 。) 


※ 最 新 ソ フト カタ ログ を ご 希望 の 方 は X1,. PC-8001mk IL, パソ ピア 7. FM-7, 日 立 レ ベル 3 マー ク V, 
MZ-2200, PC-6001mk II の 機種 名 を 明記 の 上 ハドソン 東京 ・OH-MZ 係 ま で 〒60 円 を 添え て , お 申し 
込み 下さ い 。 


※ 通 信販 売 は ,. ソフ ト 名 を 明記 の 上 お 近く の ハドソン ・OH-MZ 係 まで 現金 書留 に て お 送り 下さ い 。 
(送料 無料) ES 


叶 シ リー スズ 新作 登場 / 


キラ ー ス テー ショ ン を 破壊 地底 タン フ に 乗 つ て 地 中 を 
せよ / \3.20O \3,6OO 


7 色 に 変化 する ボー ル を フ 
ライ バン で 打ち と れ /wa zoo 


あな だ も 名 人 位 に チャ レン ) 大 空 を 1 人 じ め 、 あ っ / ロ 
ジ / \4.8oo \- に ニダ / ケッ ト が \3,2OO 


空前 の 名 機 ゼロ 戦 に 乗 つて 玉 の 動き を よ ぐ 見 て す ば や 


小犬 の 警察 官 は 力 は な ぐ て ギヤ ジ シグ マシ の カー ヂ エ ゴマ ゴ 


※ こ の 画面 は 、 当 社 モ ニタ ー で 撮っ た も の て 機種 に よっ て 画面 は 異な り ま す 。 
EEIEDESEEE 間 ーーーー ュ ーーー ニ ーーー ニニ ニニ ニニ ニニ EE ハドソン 札幌 /〒062 札幌 市 型 * 3 条 5 ] 目 4 番 17 号 コロ ナー ド 平 岸 II201 PHONE:011-821-1538 


ハドソン ン 仙 980 5 
⑤ ハドソン 金 沢 /〒920 金沢 市 ( 
ハドソン 東京 /〒102 T 代 田 区 麹町 4 丁目 7 番 5 号 麹町 ロイ ヤル ビル 2F PHONE:03-234-4996 
ハドソン ン 大 阪 /〒542 大 阪 市 南 区 南船場 4 丁目 2 番 18 号 佐野 屋 橋 ビ ル 5F PHONE:06-251-1945 
ハドソン ン USA/2063 CENTER STREET BERKELEY CA 94704 TELEPHONE 415-845-1416 


O 科 単 に 使え る O 豊 営 な 機能 


WW ワー ド フロ セッ 
SHARP バ パソ コン TV X1, MZ-2000, MZ-2200 


HuWP の 概要 

この ワー ド プ ロモ セッ サー ソフ ト は パソ コン 本 体 と 純正 プリ ンタ ー に 漢字 ROM の 組み 合せ で 使用 し ます 。 使用 可能 な 文字 は 、 漢 字 ROM に 含ま 
れ て いる JIS 第 1 水準 の 2965 字 及び 、 片 か な な 、 ひ ら が な 、 英 数 字 、 一 部 の 記号 な ど は 直接 キー ボー ド か ら 、 又 漢字 は か な 漢字 変換 方 式 で 簡単 に 
入力 する こと が で きま す 。 こ の 漢字 か な 変換 は 従来 の チカ ー プ ベー ス の も の で は 非常 に 困難 で し た が 、 か な 漢字 変換 R OM を 使用 する こと に より 、 
本 体 の メモ リー 空間 を 使用 する こと な く 〈 約 6400 字 の 読み 方 辞書 を 持つ こと が で きま し た 。 ま た 、R OM ベー ス で す の で 変換 は 大 変 高速 に 行え を ます 
し 、 も ちろ ん 漢字 パタ ー ン の 表示 も 漢字 ROOM の お か げ て で 高速 に 表示 し ます 。 

文章 の 編集 機能 も 強力 で ど コ ユン トロール コー ド を 用 いる こと に よっ て 、 文 章 の コピ ー、 移 動 、 イ ン サ ー ト (挿入 )、 デ リー ト (削除 ) な ど が 自由 自在 
に 行え を ます 。 ま た 、 文 字 の サイ ズ は 倍角 、 全 角 、 半 角 が 自由 に 選べ アン ダー ライ ン も 引く こと が 出来 ます 。 作成 し た 文書 は カモ ッ ト テ ー プ に 記録 
また は 再生 する こと が 出来 、 そ を れ に 要する 時 間 は 1 ペー ジ 当 り 1 分 以内 と 高速 に な っ て いま す 。 

以上 の よう に この ワー ド プ ロ セ ッ サ ソフ ト HuWP は 、 フ ロッ ピー ディ スク を 使用 し な い 物 の 中 で は 豊富 な 機能 を 持ち 、 フ ロッ ピー を 使用 し な い 
こと に より 、 ト ー タ ルコ スト も 大 変 安価 に な っ て いま す 。 


HuWP の 特長 HuWP の ペー ジ 構 成 
1 ) カナ 漢字 変換 R 0M の 使用 で 漢字 の 入力 が 大 変容 易 に な っ た 。 1 
2) 1 ペー ジ に は 全角 文字 2,560 文 字 を 収 傘 で き 、 本 体 メ モリ ー 内 に 2 ペー ジ 
記憶 で きる 。 
3) カモ ッ ト ベ ー ス の ワー ド プ ロモ セッ サ で あり な が ら 、 高 機能 で ある 。 
4 ) 画面 上 に 不要 な マー ク を 使用 せ ず 、 印 字 る れる 状態 の まま の 表示 に な る 。 


ディ スプ レイ 
(倍角 、 半 角 な ども 画面 上 に 表示 る れる 。) 表示 部 分 
5 ) 用 紙 の サイ ズ に 合せ て 、 色 々 な 印字 状態 が 設定 で きる 。 40 文 字 X 9 行 


6 ) 廊 章 全体 の レイ アウ ト を 表示 する こと が で き 、 レ イア ウト 表示 中 で も 、 
通常 の 入力 修正 が 出来 る 。 


1 ペー ジ に は 全角 文字 


7 ) 文章 を 1 ページ 、 1 分 以内 に 記録 再生 で き る 。 で 2560 文 字 入 り ま す 。 
8 ) カナ 変換 の 時 、 読 み 方 の 前 後 を ワン タッ チイ で 検索 し て くれ る 。 本 体 メ モリ ー に は 2 べ ペ 
9 ) 親切 な HELP 機 能 が ある 。 } ー ジ 分 入り ます 。 
10) フル マシ ン 語 で キー タッ チ が 良い 。(X1 は 一 部 BASIC で 記述 ) < 40 字 
HuWP を 使用 する 際 必 要 な シス テム HuWP の 実行 
パソ コン TV X1 MZ-2200& MZ-2000 X1 の 場合 
本 CZ-800G 200 or MS089 1 ) 電源 を 入れ 、 本 体 附属 の BASIC テ ー プ を まず LOAD し て 下さ い 。 
Ro re me yh 2 ) BASIC の LOAD 終 了 後 、 本 WP ソフ ト を カモ セッ ト に セッ ト し 、 
で 人 Mo RUN"" し て 下さ い 。 
EPSON MPC8O TYPES:J00 TYPES 3 ) マシ ン 語 部 分 を 読み 込み アデ ログ ラム は AUTO START し て 初 
RP-80.FP-80 は PIO-3050typeMP06 期 画面 に な り ま す 。 
を 接続 すれ ば 使用 可 MZ-2200&MZ-2000 の 場合 
漢字 ROM ボ ポー ド CZ-8KR PIO-3055 1) ww 本 WP ツ フ ト を カセット に セット し て LOAD& 
由 | に 8 g ぐい 。 
グラ フィ ッ ク HRAM | CZ-8GR MZ-1R01+MZ-1R02(MZ 2900 な を BASIC テ ー プ は 必要 あり ませ ん 。 
MZ-2200 の 場合 は 内 蔵 済 2 ) ソフ ト テ ー プ 読込 み 終 了 後 、AUTOSTART し ます 。 


MODEL:SHARP パソ コン TV X1 SERIAL X-3052-G \24,800( 変 換 ROM 付 ) 
MODEL:SHARP MZ-2000.MZ-2200 SERIAL WB-3500A \24,800( 変 換 ROM 付 ) 
WB-3500B \19,800( 変 換 ROM 無 ) 


HUDSON GROUP ハ ド ン ソン 札幌 /〒062 札幌 市 刺 平 区 平岸 3 条 5 丁 目 4 番 17 号 コロ ナー ド 平 岸 T201 PHONE:011-821-1538 


⑯) ハドソン 仙 台 /〒980 宮城 県 仙 訓 市 宮 町 1 丁目 4 番 28 号 PHONE:0222-65-7031 
ハ ド ン ン 金沢 /〒920 石川 県 金沢 市 本 町 2 丁目 1 番 28 号 PHONE: 0762-23-1263 
ハドソン 東京 /〒102 東京 都 千代 田 区 麹町 4 丁目 7 番 5 号 麹町 ロイ ヤル ビル 2F PHONE:03-234-4996 
ハ ド ン ン 大 阪 /〒542 大 阪 市 南 区 南船場 4 丁目 2 番 18 号 佐野 屋 橋 ビ ル 5F PHONE:06-251-1945 
ハドソン USA/2063 CENTER STREET BERKELEY CA 94704 TELEPHONE 415-845-1416 


ソフ トカ タロ グ を 二 碗 望 の 方 は X1, PC-8001mkIl.FM-7,。 バ ソ ヒア 7, 日 立 レ 
ク V, MZ-700, MZ-2200. PC-6001mk II の 機種 を 明記 の 上 , ハドソン 東京 
浜 えて , お 申し 込み 下さ い 


No.3 


な う 


SCO S じ ロ E 
と mm つや つや 
# + ュ 「 0 
』 * 
HH キ HH エエ 1 すす すす すす 二 十 二 イ だ 
に 
ーー = 
ーー ー 


Hi ち 5C0RE: に 


No.4 


LEVEL: 6634 LEFT: 2 SCOKE : 666466 


| 


呈 に ぅ 較 
Er に に 0 才 寺 人 昌 


て ぐ と " れ 好 キー を お し て く 到 "さい うっ > 


※ 通 信販 売 は ソフ ト 名 を 明記 の 上 . お 近く の ハドソン A 一 7 係 ま て 現金 書留 に て お 送 
り 下 さい 。 (送料 無料 ) 


ローーーーー 


人 59W  ーー 


オー ル マ シ ン 語 シリ ー ズ みん な 君 の も の // 


No-1 ひつ じゃ や ー い 

牧歌 メル ヘン 調 ゲ ー ム で す 

X1. PC 一 8001mkII,FM 一 7, 
レベ ル 3 マー ク V, MZ-2200 


\3.800 


対応 機種 
2X 尼 鶴 。 


No.2 MJー05 
地球 の 運命 を 握る の は あな だ 


対応 機種 X1,PC-8001mkII,FM-7 
レベ ル 3 マー ク V, MZ-2200 


No.3 HELP/ 
ヘビ と あな だ の 知恵 ら ベ 


対応 機種 X1,PC-8001mkII,FM-7, 
レベ ル 3 マー ク V, MZ-2200 


No.4 華 黄 な 怪盗 \3.800 
華 豚 に 登場 , カジ ノン の 金 を か つば ら え / 
対応 機種 X1,PC-8001mkII( \3.200),FM-7, 


\3.200 


\3.800 


No.5 Justice Knight \3.200 
マイ コン は も う メ ル ヘ ン そ し て ファ ンタ ジー 


対応 機種 X1,PC-8001mkII( \ 3.200),FM-7, 
レベ ル 3 マー ク Y 


\3.800 


No.6 フィ ー ル ドウ ォ ー ズ 


地雷 を セツ ト し て オバ ケ を や つつ けろ 
対応 機種 X1,PC-8001mkII,FM-7, 


No.7 バブ ルク ンド 1999 \3800 
伝説 の 都 バ プル フン ド を 守る の は 君 だ 


対応 機種 X1,PC-8001mkII,FM-7, 
パソ ピア 7, レベ ル 3 マー ク V(\3.200) 


No.8 スカ イダ イ バ ー  \3.200 
大 空 を 1 人 じ め , あっ / ロ ケット が 
対応 機種 X1(\3.800),PC-8001mkII,FM-7, 


No.9 パワー フェ イル  \38s00 
ハドソン 開発 セン ター を 守れ / 
対応 機種 X1。PC-8001mkII,FM-7, 
パソ ピア 7, レベ ル 3 マー ク V, MZ-2200 


No.-10 スー バー モン スタ ー \3.s00 
プロ ッ フ で モン スタ ー を サン ドイ ツチ 
対応 機種 X1, 


No.11 キラ ー ス テー ショ ン \3.200 


キラ ー ス テー ショ ン を 破壊 せよ / 
対応 機種 X1,PC-8001mkII,FM-7, 


No.12 イタ サン ドリ アス ysoo 


地底 タン ク に 乗 つ て 地 中 を 走れ / 
対応 機種 X1,PC-8001mkII,FM-7, 


No.13 ミス テリ ー マ ワ ウソ テ ン \3.200 


謎 の 山 を 征服 で きる か 


対応 機種 X1,PC-8001mkII,FM-7, 
レベ ル 3 マー ク V 


No.14 サブ マリ ン パ ニッ ク \3.200 


敵 洪水 艦 は 近い ぞ 
対応 機種 X1,FM-7, レ ベル 3 マー ク V 


No.15 コ 人 マー ジャ ン \4800 


グラ フィ ッ ク フク に よる 本 格 的 4 人 マー ジャ ン 
対応 機種 X1, 


No.18 
B O MN BER HaN 
し 


も 


joke 
[ 加 G]erep_cor  [ 画 記 souep o レ or 
Copwrieiht < で ) 2208 Hudpon of も ! ワ nor 


No.16 ヒヨコ ファ イタ ー  \3.200 
ヒヨコ に な っ て タマ ゴ を 食べ よう 
対応 機種 X1,PC-8001mkII,FM-7, 


No.17 ガン マン \3.200 
君 は 西部 の プロ ガン マン 
対応 機種 X1.PC-8001mkII( Y 3.800) 
FM-7, 


No-18 ポン バー マン 
風船 オバ ケ を や つつ けろ 
対応 機種 X1(Y3.200),PC-8001mkT, 
FM-7, 


\3.200 


No.19 ザ ・ ス パイ ダー 


\3.800 


飛来 する 宇宙 グモ を 攻撃 せよ / 
対応 機種 X1, パ ソ ピ ア 7, レ ベル 3 マーク Y 


No.20 ミス ター バタ フラ イ \3.800 


あ / 蝶々 ガ 毅 つて くる 
対応 機種 X1,PC-8001mkII, FM-7, 


この 画面 は , 当社 モニ ター で 撮っ た も の 


で , 機種 に よっ て 異 り ます 。 


O 〇 金沢 営業 所 オー プン の 為 SE 募集 (勤務 地 ・ 金 沢 ) 〇 東京 営業 所 まで , 履歴 書 ( 写 真 添付 ) を 人 事 課 ・ 大 里 ま で お 送り 下さ い 。 


HUDSON GROU 


ハ ド ン ソン 札幌 /〒062 札幌 市 典 平 区 平岸 3 柔 5 ] 目 4 番 17 号 コロ ナー ド 平 岸 TT201 PHONE:011-821-1538 


⑧) ハドソン 仙台 /〒980 宮城 県 仙 右 市 宮 町 1 丁目 4 番 28 号 PHONE:0222-65-7031 
ハ ド ン ン 金沢 /〒920 生 川 県 金沢 市 本 町 2 丁目 1 番 28 号 PHONE: 0762-23-1263 
ハ ド ン ン 東京 /〒102 東京 都 千代 田 区 麹町 4」 日 7 番 5 号 麹町 ロイ ヤル ビル 2F PHONE: 03-234-4996 
ハ ド ン ン 大 阪 /〒542 大 阪 市 南 区 南船場 4 丁目 2 番 18 号 佐野 屋 橋 ビ ル 5F PHONE: 06-251-1945 


ハ ド ン ン USA/2063 CENTER STREET BERKELEY CA 94704 TELEPHONE 415-845-1416 


特価 * 低 金利 


らく らく クレ ジ 


PC-600IMK II 申込 金 \ 8.000 9) FM- 7 申込 金 \ 8,000 
PG-60M43 分 割 回 数 24 回 SHARP 14M-13C 分 割 回 数 20 回 
RGB ケ ー ブ ル 初回 金 \ 7,100 
| PC-6022 5 初回 金 \ 6,500 専用 デー タレ コー ダ 月 額 \ 6.400 
プリ シタ ケー ブル 月 額 Y\ 6.100 ソフ ト 3 本 ボー ナス 月 \20,000※ 3 
| ソン フト 3 本 2 ボー ナス 月 \30,000※ 4 合計 \2l9.400 1・ 
| 合計 \296,300 
PC-600IMK II 申込 金 \ 4,000 FM-7 申込 金 \ 5 .000 
(2 PC-60M43 分 割 回 数 24 回 (10 カラ ーTV ア ダ プ タ 分 割 回 数 20 回 
| PC-6082 初回 金 \ 5,100 ツ ソフ ド 3 李 初回 金 \ 4,600 
ソフ トド 83 本 月 額 \ 5,100 合計 \I4I,000 月 額 \ 4,600 
合計 \179,400 ボー ナス 月 \10,000※4 ボー ナス 月 \|I0,000※3 
PD-6001MIKM 申込 金 Y 6.000 FM-IIEX 申込 金 \ 59.000 
3) ソン フ ト 3 本 _- 分 割 回 数 24 回 (11) 増設 FDD 分 割 回 数 36 回 
合計 \93,.800 初回 金 \ 4,000 I6 色 カラ ー モ ニタ 初回 金 \12,300 
月 額 \ 3.200 RGB ケ ー ブ ル 月 額 \ 9,900 
ボー ナス 月 \10.000※4 EPSON FP-80 ボー ナス 月 \55,000※6 
グリ シク ケー ブル 
《 Pcooivkn 申込 多 \ 8,000 クン ォ ー ム L90 夫 
| PC-800IMK II -0 分 割 回 数 24 回 ご 
2000 女 字 カ ラー 初 回 金 \ 8,200 は 
RGB ケ ー ブ ル 月 額 \ 6.100 0 ーー po 0 
PC-6082 ボー ナス 月 \20,.000※ 4 ゆめ MZ- 2200 申込 金 \ 9,000 
| ツラ ト 3 本 MZ- 1 T02 分 割 回 数 20 回 
| 合計 \255,400' 14M-131C 初回 金 \ 8,400 
RGB ケ ー ブ ル 月 額 \ 7,300 
(57 PC-800IMK II 申込 金 \ 5,000 る 2 406 ーー ポー ナス 月 \I5,000※ 3 
カラ ーTV ア ダ プ ブタ 分 割 回 数 18 回 紀 を 
専用 デー タレ コー ダ 初回 金 \ 6,500 MZ-731 申込 金 \ 8 000 
ソン フ ト 3 本 月 客 Y\ 5.300 13) 14M-II1C 分 割 回 数 18 回 
合計 \!l56,600 ボ ポー ナス 月 \20.000※ 2 RGB ケ ー ブ ル 初回 金 \ 7,500 
| 一 ツ フ トド 。 3 本 月 額 \ 6,400 
(6) PC- 9801 申込 金 \98,000 合計 \206,600 ボー ナス 月  \15,000※ 3 
PC-9801-01 分 割 回 数 42 回 Peace mn Pr 
PC-9881 初回 金 \17,400 な (と A ム SIO 32 
SHARP 14M- 114C 月 客 \15,200 FP-1100 申込 多 \ 4 800 
RGB ケ ー ブ ル ボー ナス 月 \50,000※7 カラ ーTV ア ダ プ タ 分 割 回 数 {2 回 
NM-9100 8 CMT ケ ー ブ ル 初回 金 \ 4.700 
ブッ ジグ グー ブッ ルレ 了 ソフ ト | 本 月 額 \ 4,200 
スト ッ ク フ ォ ー ム 1.000 ーー ュ こ ュー T 9 
証 ” 定 1JD2W-3D 合計 \143.800 \69,800 ボー ナス 月 Me 2 
PC-9801 申込 金 \39.000 = 6 
の POC- 9801-03 分 割 回 数 36 回 2 申込 多 000 
14V-14 分 割 回 数 24 回 
SHARP14M-114C 初回 金 \ 7,200 RGB ケ ー の 初回 金 \ 6,300 
RGB ケ ー ブ ル 月 額 \ 5,400 合計 \201.400 。 月 額 \ 6,100 
PC-6082 。 ボー ナス 月 \37,000※6 ボー ナス 月 \|3.000※ 3 
合計 \502,600 5 人 
IE 
8) PC-9801 申込 金 \ 5.000 8 
MHR RMK 9 6 Ro 。。 2 生 。 " 
の NVP ダッ の 初回 多 ID0 合計 \206.600 1.- 初回 金 \ 6,700 
ソフ ト ! 本 有 月 額 \ 6,300 の 月 客 \ 4 900 
合計 \329.500 ボー ナス 月  \30,000※4 ボー ナス 月 \18,000※ 4 
ェ ューー ーーーーーー 一 ー ーー ーー ーーー ーー ニ ーー ニュ ーー mm am 
時 e 還 ] ] 木曜 日 定休 ) 
5 可 g 唱 還 ! に 下 
ーー コ 9729 グ る マイ コン セン ター 
人 @ 国 電 秋 茎 庫 駅 西口 か ら 徒 生 5 分 


@ 国 電 わ 六 の 水 駅 か ・ 
101 東 京都 千代 田 区 2 外 神 


ヒロ セ マ イコ ン フラ サ 隊 還 | 


7 谷 (03)255-2741 


合 (0222)25-3076 


パリ ツ コ ソエル ビ ペグ が 


、ー、 。 HO 


機種 : X1(CZ-800C) 製品 番号 ・ B6-2213 価格 : \3.800 


| 大 容量 435UDU バ イト の ユー ザー エリ カ 豊富 な ソフ ト も 使え ます 。 
画 史 上 初 / シ ステ ム ソ フ トウ ェ ア コ ン バ ー タ 画 


メモ リ が 足り な い 。 ソ フト が 足り な い 。 も う 、 こ ん な 事 は 言わ せま せん 。 名 機 MZ-2000・MZ-2200 用 の BASIC、 大 フリ ー 
エリ ア 、 豊 富 な ソフ ト の ある MZ-|Z00I・MZ-IZ002( 共 に BASIC テ ー プ の 名 称 ) が X| で 使え る か ら で す 。 こ れ ら の テー プ は その 
まま で は XI で 読み 出す 事 も 起動 させ る こと も で きま せん が 、 こ の 不可 能 を 可能 に する ー- 一 それ が シス テム ソフ トウ ェ ア コ 
ン バ ー タ で す 。 
玉 操 作 は カン タン / 購 入 直後 に 10 分 間 だ け お 付き 合い 下さい 画 
シス テム ソフ トウ ェ ア コ ン バ ー タ は 、MZ-IZ001( ま た は MZ-IZ002) を XI に て 読み 出し 、XI の ハー ド に 合わ せ て 内 部 を 改造 す 
る プロ グラ ム で す 。 改造 が 終わ れ ば (この 部 分 は 9 秒 で 完了 ) テ ー プ に SAVE さ れ ま す 。 も ちろ ん これ ら の 手順 は 親切 な 対 
話 式 の た め 、 マ ニュ アル な し で も 簡単 に 使え ます 。 こ うし て 一 度 、XI 用 MZ-IZ001、MZ-IZ002( 名 付け て CZ-IZ001、 CZ-|Z 
002) を 作っ て し まえ ば 、 後 は 「CZ-8CB0I」( 付 属 BASIC) と 全く 同等 に 扱え ます 。 CZ-8CB0I を 使え ば X| に 、CZ-IZ00I を 使 
えば MZ-2000・MZ-2200 に まさ に ソフ ト だ け て で 2 台 分 活用 で きま す 。 
田 MZ-B000、PB00U に な っ た XX 画 
次 か ら は CZ-8CB0I と 同じ 要領 で 起動 で き 、 ロ ー デ ィング 時 間 も 1 分 42 秒 に 短縮 され て いま す 。 OCZ-IZ001(CZ-IZ002) を 使え 
ば 、MZ-2000・2200 で 作成 され た BASIC ア プリ ケー ショ ンプ ログ ラム の LOAD、SAVE( キー ボー ド か ら の 入力 も も ちろ ん ) 、RUN が 
出来 ます 。 当 然 文 法 の 違い も な いた め 手 直し も 不要 で す 。 また MZ-80 B 用 ソフ ト も 、MZ-2000 で 動く も の で あれ ば 同様 に 
使え ます 。(B 用 の ゴル フ ゲ ー ム 、 君 は ター ゲッ ト 等 も お 使い に な れ ま す ) キャ ラク タ や 、 フ リー エリ ア (43500 バ イト 、 
MZ-IZ002 は 39148 バ イト ) ま で 完全 コン パチ 、 し か も A 面 、B 面 に 同 内 容 を 入れ て 販売 いた し ます の で 、 A 面 で CZ-IZ001 を 、 
B 面 で CZ-|Z002 を と いっ た 高度 な 活用 も で きま す 。 
※※※ 御 注意 ※※※ 
@ 本 ソフ ト は MZ-IZ001(MZ-IZ002) を XI で 動く よう に する も の で す 。 著 作 権 上 、MZ-IZ001( \2,150) か MZ-IZ002(\7,000) 
を 合わ せ て 御 購入 下さ い 。 な お どちら に する か 迷っ た 方 は 、MZ-IZ001! に し て 下さ い 。 
@ マシ ン 語 レベ ル の 操作 が あり 、 か つ そ の 中 で |/0O 操 作 を し て いる 場合 は MZ-80B~MZ-2000 の 時 と 同様 正常 に 動作 し な い 
こと が あり ます 。 逆 に 、 オ ー ル マシ ン 語 で モニ タ か ら LOAD す る も の で も 種類 に よっ て は 動作 する も の が あり ます 。 

@ ディ スク 版 、 倍 精度 十 進 演 算 BASIC 版 、 マ シン ラン ゲー ジ 版 、LO0GO な ども 続々 発売 予定 で す 。 御 期待 下さ い 


X1 Pc-8001 ーCZ-800………… B6-1483 MZ-700 PC-8001 つ MZ-700… om B5-1483 \3.800 


PC-8801 っ CZ-800……… B6-1493 PC-8801 つ MZ-700… つ ili B5-1493 \3.800 
MZ-80B・2000 一 CZ-800……… バ … B6-1413 


MZ-80K/C・1200 一 CZ-800 1 に X1 用 逆 ア セ ンプ ラ 本条 8 08 (写る: 和泊 [@ 洛 | B6-1400 \4.200 
太平 ビル 3F 当社 の 製品 は お 近く の マイ コン ショ ッ プ 等 で お 求め 下さ い 。 
マイ コン ショ ッ プ 近く に な い 場 合 は 、 現 金 書留 に て 直接 お 申し 込み 下さ い 。 
送料 200 円 


宇都 宮 の 本 格 的 な BASIO 
マイ コン ショ ッ プ HOUSE 


〒320 宇都 宮 市 欄 3 華 
会 0286-33-1994 3 ビビ 
会 0286-37-3997 4 ビ 


MZ-35OO に 本 格 的 ワー プロ ・ ソ フト 新 登場 . ノ 


文 MZ-3500 用 
5 イン チ 両 面 (MZ-1004) \48,000 (D) 


※ シ ステ ム デ ィ ス ク の 他 に 熱 語 ・ 短 文 用 ディ スク 付 。 


シス テム 構成 バン ャ ン 八 


本 体 : MZ-3500( 漢 字 ROM 付 ) 2 ドラ イブ 以上 実装 。G-RAM の 有無 は 問い ませ ん 。 
C R 征 : MZ-ID02(400X640・ グ リー ン )、MZ-ID03(400X640・ カ ラー) 

プリ ンタ : MZ-IP03(24X24 ド ッ ト ) 

MZ-IP06(16XI16 ド ッ ト ) 

※ プ ブリ ンタ ご と に 別 製品 に な っ て いま す .。 

指定 構成 機器 以外 で の 使用 に お いて は 、 


ソン フ ト の 責任 を 負い か ね ます 


機 能 


ee カナ 漢字 変換 入力 ・I6 進 コー ド 入力 
ed セン ター リン グ 、 右 寄せ 、n 女 字 挿入 ・ 削 除 、 一 行 挿入 ・ 削 除 。 


CCCLC 3 文字 まで 、 最 大 24 ,000 
文書 作成 中 に 登録 可 、 誤 語 リ スト の プリ ンタ 出力 可 
吾 語 呼出 時 の 自動 学習 機能 有 。 
ーー 100 文 字 ま で 、1I00 文 
文書 作成 時 に 登録 可 、 短 文 リ スト の プリ ンタ 出力 可 。 


語 五 
ロロ 


ーーー 40 桁 16 行 、ROLL・UP、ROLL・DOWN、 縮小 画面 ( 女 書 作成 中 に 可能 ) 


ーーー 1 ペー ジ に 40 廊 字 メ 39 行 ま で 、 連 続 印 刷 可 、 行 間隔 
字 の 混在 可 、 自 動 縦 書 機能 。 


あ 72 頁 (DISK | 枚 当り ) 


・ 女 字 間 隔 指 定 可 、 拡 大 文 


ais アン ダー ライ ン (MZ-1IP03 は 不可 ) 


太 詳 し い 資料 ご 希望 の 方 、 下 記 宛 まで ご 請求 下さ い 。 


1 "スス 、 キー に 2 普 人 34-/ 
〒530 大 阪 市 北 区 同 2 目 5 番号 〒170 東 * -34- 
I 上 | 田 | 恋し ルル a06-32-7137 丸善 大 辺 ピ ビル 人 03-981-3701 


バン コン 且 代 を リー 包ま 
NN ンコ ン ケー ン ョ ヨン 


ボボ 松 左京 


東京 都 新宿 区 新宿 3] 目 30 番 1 号 高野 第 2 ビル B1(〒160) 
合 ( 〇 3③)3③52-3131 


ビジ ネス ソフ ト と 合わ せ て J& 自 慢 の 

大 ソフ トコ ー ナ ー で す よ 全国 か ら 集 め た 優秀 な 
ソフ ト は 3.000 種 類 。 お 求め や すく 機種 別に 分 けた 
展示 が 好評 で 


国内 ・ 海 外 の 人 気 機種 が ズラ リ 勢 揃い 。 あ な た の 
目的 に 合っ た 機種 が ご 自由 に お 選び いた だ け ま れ 
また 、 デ イス プレ イ . プ リン タ 、 フ ロッ ピ イ デイスク 

な ど 周 辺 機器 を 集中 展示 し て お り ま すれ 


J&P 自 慢 の ソフ トコ ュー ナー は 豊富 な 
アプ リケーション ソフ ト が * ギ ッ シ リ / 目的 に 合っ た 
ソフ ト の 選択 か ら 特 別 オー ダー も 承り ます 


0A 機 器 コ ユー ナー で は 他 で は 見 られ な い 各 メー カー 
有力 機器 が 比較 検討 で きま る 

ワー ドブ プロセッサー・ フ ァ ク シミ リ な ど OA 化 に は 

欠か せな い 機 器 を 取 揃 えて いま も 


( 和泊 - 随 史 - 計 拡がる MeP ネ ットワーク 久 
全店 5 コラ ウフ 52F 記 っ 5 半 お 問 合 わ せ 、 お 申し 込み は 下記 の 


ょ 着 妥 デ ィ ア ラン ド パソ コン 教室 まで お 電話 で どう ぞ 。 


ーー ーー ーー ーーーーーーーーー 
東京 者 渋谷 区 道 支 坂 2 丁目 28 番 4 号 (〒150) 


全 (O3)496-4141 


可 吉 京都 寺町 店 


者 市 区 困 私 え き 下 ん 和え 和 54( 二 600) 
合 (O75)341-357 1 


る sm 蛇 ノバ 店 


る 市栄] B45 SAKAE NOVA6F (〒460) 
全 (O52)261-9201 


大 阪 市 湾 加 区 日 本 橋 5 丁 目 6 番 7 号 (〒556) 
全 (O6)G44-1413 


長く ず は 店 


枚方 市 柄 葉 並木 町 2 丁目 2 一 2(〒573) 


合 (O72O)56-8181 


四日市 店 


四日市 市 鵜 の 森 2 一 1 一 19(〒510) 


合 (O593)54-3366 


大 阪 市 浪速 区 日 本 橋 4 丁 目 11 番 3 号 (〒556) 


人 な (O6)644-1613 


天 存 千里 中 央 店 


全市 新 千里 東町 1-3-204 千里 サン タウ ン 3F( 〒565) 


合 (O6)834-4141 


= 津 店 


津 市 刀 之 内 31 一 20(〒514) 


全 (O592)26-O1 1 1 


初め て の 方 で も 、 マ ニア の 方 に で も 
分 か りや すく 、 楽 し い カ リキ ュ ラ ム の 
各 講 座 を ご 用 意 い た し て お り ま す . 


渋 谷 店 教室 (03) 496-4148 
デフ ノラ ンド 教室 (06) 644-5566 
メ テ ディ アラ ンド 教室 (06) 644-1613 
京都 寺町 店 教室 (075)341-3573 
くず は 店 教室 (0720)56-8181 
日 市 店 教室 (0593)54-3366 
津 店 教室 (0592)26-0111 


同じ 選 示 な ら 初め か ら 本 モノ を … バ 将来 性 まで 見 きわ め て 選び た ぃ 。 いま 
MZ が iz\ ソ コン の 機能 と 価格 の 概念 を 破り まし だ た 。 上達 に 合わ せ て 進化 する 
先駆 の クリ ー ン 設計 、 家 庭 用 カラ ー TV が 使え る 、 そ し て 高度 な シス テム へ の 
可能 性 を 秘め た 優れ た 拡張 性 。 き さき ら に 、 デ ー タ レコ ー ダ '、4 色 カラ ー プ "ロッ タダ 
プリ ンタ まで 本 体 に 収納 で きる 高密 度 オ ー ル イン ワン タイ フ 。 MZ-700 シ リー ズ 
は 、 パパ ソコ ン の 在り 方 を 徹底 し て 追求 し た 、 ま る に マニ ア も 和敬 く 本 格 仕様 で も 
気軽 に 触れ 合え る 、 高 度 な テク ニッ ク も 駆使 で きる 。 ホ ビー か ら 実 務 ま で あら ゆる 
目的 に 、 そし て あら ゆる 人 々 に 存 分 に 活用 し て いた だ きた だ い 自信 作 で まれ 


は 「 タ スク フォ ー ツ 高知 」 制 作 の 
"ピル テッ ング ・ ホ ッ ノ マ 


* 


トー 


NASSry 


各 殺 規 藤 更 ( 攻 日 T 回 [日 穫 ) 本 台 画 正 園 の UI) 


, 理 器 \ー こ ござ S 潤 誤 


ぐさ 
と 


4 14 型 カテ ラー デ ィ ス プレ イ 
MZ-1D05 標準 価格 69,800 円 < 別売 > 


INZ-Z11 
標準 価格 79,800 円 


= 
| | 


す 。 


iR 一 やこ NN 時 査 へ w 党 の 深く コ 削 油 導 


| 
血 格 128,000 円 


デー タレ コー ダ ・ カ ラー プロ ッ タ プリ ンタ 内 蔵 


、 よ り 。 


パー ソナ ルコ ンピュータ 


グー /[[J シ リー メ 


く MZ-700 シリ ー ズ の 主 な 特長 > 欠 高 速 ・ 高 機能 CPU Z80A(3.6MHz) 搭載 欠 メ イン メモ リ 64K バ イト 
RAM 標 準 実 装 の クリ ー ン メモ リ シ ス テム 鍛 カ ラー 対応 BASIC 装備 免 BASIC を 考慮 し た 使い や すい キー 
配列 葵 ひら が な 、 英 小 廊 字 対応 (ディ スプ レイ ) 欠 家 疑 用 TV、 専用 カラ ー デ スプレイ (別売 ) に よる 多彩 な 
ビジ ュ ア ル 対 応 代 外 部 プリ ンタ 用 イン ター フェ イス 内 蔵 尋 MZ-80K シ リー ズ ・80C・1200 の シス テム ソフ ト 
(PASCAL、 マ シン ラン ゲー ジ 等 ) が 活用 可能 代 豊 富 な アプ リケーション 環境 免 グ ラフ ィ ッ ク 機能 を 装備 し た 
4 色 カ ラー プロ ッ タ プリ ンタ 内 蔵 (MZ-731) 共 デ ダイ スプ レイ の 使用 で き な い 所 で も 、 そ の 代用 と し て 活用 で きる 
プリ ンタ と の 対話 モー ド 装 備 ( プ リン タ 要 ) 


や いい 、 の ャ 株式 会 社 545 大 阪 市 条 億 野 区 長池 町 22 番 22 号 合 (06)621-1221( 大 代表 ) 


2 9 則 誠 (| | r4 費 日 本 ソフ トバ ンク 発行 Printed in Japan 定価 480 円 雑誌 02179 一 10 


